
2 May
2006
2 May
'06
5:04 p.m.
Update of /project/climacs/cvsroot/climacs In directory clnet:/tmp/cvs-serv24098 Modified Files: lisp-syntax.lisp Log Message: Fixed `form-operator'. --- /project/climacs/cvsroot/climacs/lisp-syntax.lisp 2006/05/02 14:33:33 1.60 +++ /project/climacs/cvsroot/climacs/lisp-syntax.lisp 2006/05/02 17:04:37 1.61 @@ -1272,7 +1272,7 @@ (defmethod form-operator ((form list-form) syntax) (let* ((operator-token (first-form (rest (children form)))) (operator-symbol (when operator-token - (token-to-object syntax operator-token t)))) + (token-to-object syntax operator-token :no-error t)))) operator-symbol)) (defgeneric form-operands (form syntax)