X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Ftest-syntax.lisp;fp=tests%2Ftest-syntax.lisp;h=2329a6c5035a55aa7460b0e2abbabf2d445da784;hp=9de62fe762a9b27adec21395b23091589d2fc73f;hb=ec671b89836aaf460308b4b511758c74e8732c62;hpb=aced01441ccf8a826de544ed34bed4d8616a14ee diff --git a/tests/test-syntax.lisp b/tests/test-syntax.lisp index 9de62fe..2329a6c 100644 --- a/tests/test-syntax.lisp +++ b/tests/test-syntax.lisp @@ -118,6 +118,13 @@ (clsql:sql [select [count [*]] :from [emp]]) "SELECT COUNT(*) FROM EMP") +(deftest :syntax/query/5 + (string-downcase (clsql:sql [select 'employee])) + "(employee)") + +(deftest :syntax/query/6 + (string-downcase (clsql:sql [select 'employee 'address])) + "(employee address)") (deftest :syntax/expression1 (clsql:sql