From e76b9fadd128d22ea0a5200a90981cf49430c4a7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
 <grubba@grubba.org>
Date: Sat, 18 Apr 2009 21:26:17 +0200
Subject: [PATCH] Added some tests of bindings and quoting.

Rev: lib/modules/Sql.pmod/testsuite.in:1.4
---
 lib/modules/Sql.pmod/testsuite.in | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/lib/modules/Sql.pmod/testsuite.in b/lib/modules/Sql.pmod/testsuite.in
index 92448bebbb..589ce01543 100644
--- a/lib/modules/Sql.pmod/testsuite.in
+++ b/lib/modules/Sql.pmod/testsuite.in
@@ -1,5 +1,17 @@
 START_MARKER
 
+test_any([[
+  Sql.Sql sql = Sql.Sql("null://");
+  return sql->query("INSERT INTO foo (foo, bar) VALUES (%s, %s) WHERE bar = %d",
+                    0, "blah", 0)[0]->query;
+]], "INSERT INTO foo (foo, bar) VALUES (NULL, :arg0) WHERE bar = 0")
+
+test_any([[
+  Sql.Sql sql = Sql.Sql("null://");
+  return sql->query("INSERT INTO foo (foo, bar) VALUES (%s, %s) WHERE bar = %d",
+                    0, "blah", 0)[0]->formatted_query;
+]], "INSERT INTO foo (foo, bar) VALUES (NULL, 'quote(\"blah\")') WHERE bar = 0")
+
 test_do([[
   catch {
     add_constant( "db", Sql.Sql("mysql://localhost") );
-- 
GitLab