branch: elpa/emacsql
commit eba26bead62d01ac1c6a5d15229332367eb60104
Author: Christopher Wellons <well...@nullprogram.com>
Commit: Christopher Wellons <well...@nullprogram.com>
Add emacsql-compile function for debugging.
---
emacsql.el | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/emacsql.el b/emacsql.el
index 4e5464aad9..4e3875a12b 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -342,6 +342,10 @@ a list of (<string> [arg-pos] ...)."
(emacsql-escape-identifier thing)
(emacsql-escape-value thing)))))))))
+(defun emacsql-compile (sql &rest args)
+ "Compile structured SQL expression into a string."
+ (apply #'emacsql-format (emacsql-expand sql) args))
+
(defun emacsql (conn sql &rest args)
"Send structured SQL expression to CONN with ARGS."
(emacsql--clear conn)
