X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fdatabase.c;h=0493d0e548a276b44f9186db994dfce26bc5a64e;hb=f9fdf5a6cb58286f64f6f8bd0bfd2dab9b9b8816;hp=8450333ef986afdcce84f20aebbb06949f20c514;hpb=d3dd71489ab2730d79536ebdc3c56cca82766e9d;p=chise%2Fxemacs-chise.git

diff --git a/src/database.c b/src/database.c
index 8450333..0493d0e 100644
--- a/src/database.c
+++ b/src/database.c
@@ -128,7 +128,7 @@ struct Lisp_Database
 static Lisp_Database *
 allocate_database (void)
 {
-  Lisp_Database *db = alloc_lcrecord_type (Lisp_Database, lrecord_database);
+  Lisp_Database *db = alloc_lcrecord_type (Lisp_Database, &lrecord_database);
 
   db->fname = Qnil;
   db->live_p = 0;