Tweak make-load-form for genera(!)
authorFrancois-Rene Rideau <fare@tunes.org>
Tue, 29 Nov 2011 23:53:29 +0000 (18:53 -0500)
committerFrancois-Rene Rideau <fare@tunes.org>
Tue, 29 Nov 2011 23:53:29 +0000 (18:53 -0500)
meta-src.lisp

index fda0236..db5d73f 100644 (file)
     char
     form)
 
-(defmethod make-load-form ((m meta) &optional environment)
-  (declare (ignore environment))
+(defmethod make-load-form ((m meta) #-genera &optional #-genera environment)
+  #-genera (declare (ignore environment))
   `(make-meta :char ,(meta-char m) :form ',(meta-form m)))