--- a/src/console-gtk-impl.h	Thu Nov 24 22:51:25 2005 +0000
+++ b/src/console-gtk-impl.h	Fri Nov 25 01:42:08 2005 +0000
@@ -49,6 +49,9 @@
 
 struct gtk_device
 {
+#ifdef NEW_GC
+  struct lrecord_header header;
+#endif /* NEW_GC */
   /* Gtk application info. */
   GtkWidget *gtk_app_shell;
 
@@ -109,6 +112,17 @@
 #endif
 };
 
+#ifdef NEW_GC
+typedef struct gtk_device Lisp_Gtk_Device;
+
+DECLARE_LRECORD (gtk_device, Lisp_Gtk_Device);
+
+#define XGTK_DEVICE(x) \
+  XRECORD (x, gtk_device, Lisp_Gtk_Device)
+#define wrap_gtk_device(p) wrap_record (p, gtk_device)
+#define GTK_DEVICE_P(x) RECORDP (x, gtk_device)
+#endif /* NEW_GC */
+
 #define DEVICE_GTK_DATA(d) DEVICE_TYPE_DATA (d, gtk)
 
 #define DEVICE_GTK_VISUAL(d)	(DEVICE_GTK_DATA (d)->visual)
@@ -129,6 +143,10 @@
 
 struct gtk_frame
 {
+#ifdef NEW_GC
+  struct lrecord_header header;
+#endif /* NEW_GC */
+
   /* The widget of this frame. */
   GtkWidget *widget;		/* This is really a GtkWindow */
 
@@ -182,6 +200,17 @@
   Lisp_Object widget_callback_ex_hash_table;
 };
 
+#ifdef NEW_GC
+typedef struct gtk_frame Lisp_Gtk_Frame;
+
+DECLARE_LRECORD (gtk_frame, Lisp_Gtk_Frame);
+
+#define XGTK_FRAME(x) \
+  XRECORD (x, gtk_frame, Lisp_Gtk_Frame)
+#define wrap_gtk_frame(p) wrap_record (p, gtk_frame)
+#define GTK_FRAME_P(x) RECORDP (x, gtk_frame)
+#endif /* NEW_GC */
+
 #define FRAME_GTK_DATA(f) FRAME_TYPE_DATA (f, gtk)
 
 #define FRAME_GTK_SHELL_WIDGET(f)	    (FRAME_GTK_DATA (f)->widget)