X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Foperations.lisp;h=d45325479fa303df265a86442e5d2f97934249c4;hp=f05df97bd118d9bb2d26828d9ff1bc3dd97267a4;hb=aad71482a312cf287e2f6e3e926cf671cd382ec7;hpb=71ac7a8d3e5bea99472b07fa2a089c7173abb1f7 diff --git a/sql/operations.lisp b/sql/operations.lisp index f05df97..d453254 100644 --- a/sql/operations.lisp +++ b/sql/operations.lisp @@ -12,7 +12,7 @@ ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* -(in-package #:clsql) +(in-package #:clsql-sys) ;; Keep a hashtable for mapping symbols to sql generator functions, ;; for use by the bracketed reader syntax. @@ -139,7 +139,11 @@ (make-instance 'sql-relational-exp :operator 'in :sub-expressions rest)) -(defsql sql-concat (:symbol "||") (&rest rest) +;; (defsql sql-concat (:symbol "||") (&rest rest) +;; (make-instance 'sql-relational-exp +;; :operator '\|\| :sub-expressions rest)) + +(defsql sql-concat (:symbol "concat") (&rest rest) (make-instance 'sql-relational-exp :operator '\|\| :sub-expressions rest))