X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-syntax.lisp;h=c2007f676f6130987337e33e87756519dd59ddd6;hb=9a70270bf9a1d60323ded33ce52bd0904544c70b;hp=62fe3f33803283f59303c8fa32c2cfb036311081;hpb=70227e5f0b76bb649fc6c1a478d7374953fd815b;p=clsql.git

diff --git a/tests/test-syntax.lisp b/tests/test-syntax.lisp
index 62fe3f3..c2007f6 100644
--- a/tests/test-syntax.lisp
+++ b/tests/test-syntax.lisp
@@ -49,10 +49,9 @@
     (clsql:sql [foo bar])
   "FOO.BAR")
 
-;; not sure about this one 
 (deftest :syntax/ident/3
     (clsql:sql ["foo" bar])
-  "foo.BAR")
+  "FOO.BAR")
 
 ;(deftest :syntax/ident/4
 ;    (clsql:sql [foo "bar"])
@@ -66,10 +65,9 @@
     (clsql:sql [foo bar :integer])
   "FOO.BAR INTEGER")
 
-;; not sure about this one 
 (deftest :syntax/ident/7
     (clsql:sql ["foo" bar :integer])
-  "foo.BAR INTEGER")
+  "FOO.BAR INTEGER")
 
 
 (deftest :syntax/value/1