branch: externals/pq
commit 0501c66e6a6791c1b4ef93eca6b200373daf2a7f
Author: Andreas Seltenreich <seltenre...@gmx.de>
Commit: Andreas Seltenreich <seltenre...@gmx.de>

    Add testcase for crash reported by "717g301github".
---
 test.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/test.el b/test.el
index 6be47b4d2f..956f9bb4c5 100644
--- a/test.el
+++ b/test.el
@@ -32,6 +32,10 @@
 
 (ert-deftest pq-escape-test ()
   (let ((conn (pq:connectdb *conninfo*)))
+    (should-error (pq:escapeLiteral "d"))
+    (should-error (pq:escapeIdentifier "d"))
+    (should-error (pq:escapeLiteral "'" "d"))
+    (should-error (pq:escapeIdentifier "'" "d"))
     (should (equal (pq:escapeLiteral conn "mo'oo\"oo") "'mo''oo\"oo'"))
     (should (equal (pq:escapeIdentifier conn "moo'oo\"oo") 
"\"moo'oo\"\"oo\""))))
 

Reply via email to