Use `define-coding-system-alias' instead of `copy-coding-system'.

[chise/xemacs-chise.git] / src / gui-x.c

diff --git a/src/gui-x.c b/src/gui-x.c
index 9921504..f176a57 100644 (file)
--- a/src/gui-x.c
+++ b/src/gui-x.c
@@ -108,7 +108,7 @@ mark_popup_data (Lisp_Object obj, void (*markobj) (Lisp_Object))
 
 DEFINE_LRECORD_IMPLEMENTATION ("popup-data", popup_data,
                                mark_popup_data, internal_object_printer,
-                              0, 0, 0, struct popup_data);
+                              0, 0, 0, 0, struct popup_data);
 \f
 /* This is like FRAME_MENUBAR_DATA (f), but contains an alist of
    (id . popup-data) for GCPRO'ing the callbacks of the popup menus
@@ -123,7 +123,7 @@ gcpro_popup_callbacks (LWLIB_ID id)
   Lisp_Object lpdata;
 
   assert (NILP (assq_no_quit (lid, Vpopup_callbacks)));
-  pdata = alloc_lcrecord_type (struct popup_data, lrecord_popup_data);
+  pdata = alloc_lcrecord_type (struct popup_data, &lrecord_popup_data);
   pdata->id = id;
   pdata->last_menubar_buffer = Qnil;
   pdata->menubar_contents_up_to_date = 0;