X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Flisp-disunion.h;h=1e69d96562cc74f8ebb31cf66912dfc4ce5280c5;hb=03e80302fb3953f2d09ee4a82d90b38f245a3c2c;hp=234c344a444e46d1908877038d6624aef787d94f;hpb=707ae753601d8478a5144878367604b6d8222698;p=chise%2Fxemacs-chise.git-

diff --git a/src/lisp-disunion.h b/src/lisp-disunion.h
index 234c344..1e69d96 100644
--- a/src/lisp-disunion.h
+++ b/src/lisp-disunion.h
@@ -117,7 +117,7 @@ XCHARVAL (Emchar chr)
 #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. */