cl-2sql

Lisp to SQL compiler for Common Lisp
git clone https://logand.com/git/cl-2sql.git/
Log | Files | Refs | README | LICENSE

commit db33734e00bf8553751490c047f0ddd86944a781
parent 8c4f2c24a2166e6e37744a806b5a0a706423d903
Author: Tomas Hlavaty <tom@logand.com>
Date:   Tue,  6 Sep 2011 23:10:34 +0200

fix delete-from query macro

Diffstat:
Mmacros.lisp | 4++--
1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/macros.lisp b/macros.lisp @@ -116,8 +116,8 @@ (:share '(:share))) ,@(cl:unless wait '(:nowait)))) -(defsyntax delete-from (tab &optional where) - `(prefix :delete :from ,tab ,@(cl:when where (cl:list where)))) +(defsyntax delete-from (tab &body where) + `(prefix :delete :from ,tab ,@where)) (cl:macrolet ;; join ((defop (name &rest rest)