X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fspecifier.c;h=d1da5f5ac1724c872e3f238bf93fb53aa8c256d5;hp=65fcdae9fa4895cce3147a11476291c2de6ce0a8;hb=976b002b16336930724ae22476014583ad022e7d;hpb=eb1f7fa6e0f89ff92b86f02c7cbdee048edd8b0d

diff --git a/src/specifier.c b/src/specifier.c
index 65fcdae..d1da5f5 100644
--- a/src/specifier.c
+++ b/src/specifier.c
@@ -415,7 +415,7 @@ make_specifier_internal (struct specifier_methods *spec_meths,
   Lisp_Object specifier;
   struct Lisp_Specifier *sp = (struct Lisp_Specifier *)
     alloc_lcrecord (sizeof (struct Lisp_Specifier) +
-		    data_size - 1, lrecord_specifier);
+		    data_size - 1, &lrecord_specifier);
 
   sp->methods = spec_meths;
   sp->global_specs = Qnil;