[movitz-cvs] CVS movitz/losp/muerte

[ffjeld]

Update of /project/movitz/cvsroot/movitz/losp/muerte
In directory clnet:/tmp/cvs-serv3049

Modified Files:
	characters.lisp 
Log Message:
Have macros in the run-time.


--- /project/movitz/cvsroot/movitz/losp/muerte/characters.lisp	2004/07/20 08:54:00	1.4
+++ /project/movitz/cvsroot/movitz/losp/muerte/characters.lisp	2008/03/15 20:57:27	1.5
@@ -10,7 +10,7 @@
 ;;;; Author:        Frode Vatvedt Fjeld <frodef at acm.org>
 ;;;; Created at:    Mon Feb  5 19:05:01 2001
 ;;;;                
-;;;; $Id: characters.lisp,v 1.4 2004/07/20 08:54:00 ffjeld Exp $
+;;;; $Id: characters.lisp,v 1.5 2008/03/15 20:57:27 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
 
@@ -70,7 +70,7 @@
 	    (return-from char/= nil)))))))
 
 
-(defmacro define-char-cmp (name mode not-branch)
+(defmacro/cross-compilation define-char-cmp (name mode not-branch)
   `(defun ,name (first-character &rest more-characters)
      (numargs-case
       (1 (x) (declare (ignore x)) t)