
Update of /project/mcclim/cvsroot/mcclim In directory clnet:/tmp/cvs-serv22364 Modified Files: decls.lisp Log Message: Fix invoke-with-new-output-record and invoke-with-output-to-output-record's arg lists to conform to the Franz User Guide, as noted in recording.lisp. --- /project/mcclim/cvsroot/mcclim/decls.lisp 2006/03/15 15:38:39 1.37 +++ /project/mcclim/cvsroot/mcclim/decls.lisp 2006/03/30 20:31:06 1.38 @@ -321,9 +321,9 @@ ;; with-output-recording-options (stream &key record draw) &body body [Macro] (defgeneric invoke-with-output-recording-options (stream continuation record draw)) ;; with-new-output-record (stream &optional record-type record &rest initargs) &body body [MAcro] -(defgeneric invoke-with-new-output-record (stream continuation record-type &rest initargs &key parent)) +(defgeneric invoke-with-new-output-record (stream continuation record-type constructor &key &allow-other-keys)) ;; with-output-to-output-record (stream &optional record-type record &rest initargs)) &body body [Macro] -(defgeneric invoke-with-output-to-output-record (stream continuation record-type &rest initargs &key)) +(defgeneric invoke-with-output-to-output-record (stream continuation record-type constructor &rest initargs &key &allow-other-keys)) (defgeneric make-design-from-output-record (record)) ;;;; 21.2
participants (1)
-
afuchs