diff --git a/init/mobject.lisp b/init/mobject.lisp index 8fbafec6221fb2d939d73fbd1dfba4023c7440cd..33b28db40028ffd65006647f75fb9211c732404c 100644 --- a/init/mobject.lisp +++ b/init/mobject.lisp @@ -1,6 +1,6 @@ ;; Definition of GSL objects and ways to use them. ;; Liam Healy, Sun Dec 3 2006 - 10:21 -;; Time-stamp: <2009-02-15 22:56:11EST mobject.lisp> +;; Time-stamp: <2009-02-16 16:24:42EST mobject.lisp> ;;; GSL objects are represented in GSLL as and instance of a 'mobject. ;;; The macro demobject takes care of defining the appropriate @@ -234,7 +234,7 @@ (:documentation "The name given to the GSL object.")) (export 'evaluate) -(defgeneric evaluate (object point &key) +(defgeneric evaluate (object point &key #+sbcl &allow-other-keys) (:documentation "Evaluate the GSL object.")) ;;; Pointer type