X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Flisp-disunion.h;h=a42cad65a3bec46311a55f610b6a17a208c9f05a;hp=4c8c69e3e5b851d71da5aa041331884b8cf0b2c2;hb=0c693dc08f0794304711787b2eb47c144ea4bef1;hpb=59eec5f21669e81977b5b1fe9bf717cab49cf7fb

diff --git a/src/lisp-disunion.h b/src/lisp-disunion.h
index 4c8c69e..a42cad6 100644
--- a/src/lisp-disunion.h
+++ b/src/lisp-disunion.h
@@ -103,7 +103,7 @@ typedef EMACS_INT Lisp_Object;
 #define VOID_TO_LISP(larg,varg) ((void) ((larg) = ((Lisp_Object) (varg))))
 #define CVOID_TO_LISP VOID_TO_LISP
 #define LISP_TO_VOID(larg) ((void *) (larg))
-#define LISP_TO_CVOID(varg) ((const void *) (larg))
+#define LISP_TO_CVOID(larg) ((const void *) (larg))
 
 /* Convert a Lisp_Object into something that can't be used as an
    lvalue.  Useful for type-checking. */