Revision: 3483 Author: ksprotte URL: http://bknr.net/trac/changeset/3483
better to use &body body (and not &rest) for two with-* macros
U trunk/bknr/datastore/src/utils/acl-mp-compat.lisp
Modified: trunk/bknr/datastore/src/utils/acl-mp-compat.lisp =================================================================== --- trunk/bknr/datastore/src/utils/acl-mp-compat.lisp 2008-07-17 12:15:06 UTC (rev 3482) +++ trunk/bknr/datastore/src/utils/acl-mp-compat.lisp 2008-07-17 12:18:34 UTC (rev 3483) @@ -17,7 +17,7 @@ #+lispworks (mp:make-lock :name name))
-(defmacro mp-with-lock-held ((lock) &rest body) +(defmacro mp-with-lock-held ((lock) &body body) #+allegro `(mp:with-process-lock (,lock) ,@body) @@ -34,7 +34,7 @@ `(mp:with-lock (,lock) ,@body))
-(defmacro mp-with-recursive-lock-held ((lock) &rest body) +(defmacro mp-with-recursive-lock-held ((lock) &body body) #+allegro `(mp:with-process-lock (,lock) ,@body)