(XSETFRAME): Set object type as well as value.

diff --git a/src/frame.h b/src/frame.h
index f714fc063ce5c686ab7a940d7376eb0a5e85657c..91ecd065d8819a73cc1f9c8873baf9000fa6c603 100644 (file)
--- a/src/frame.h
+++ b/src/frame.h
@@ -254,7 +254,7 @@ struct frame
 typedef struct frame *FRAME_PTR;
 
 #define XFRAME(p) ((struct frame *) XPNTR (p))
-#define XSETFRAME(p, v) ((struct frame *) XSETPNTR (p, v))
+#define XSETFRAME(p, v) XSET (p, Lisp_Frame, v)
 
 #define WINDOW_FRAME(w) (w)->frame