# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 788751687 0
# Node ID e4a6f55757a9a4f82bacef9d929a831fc94a3391
# Parent  2e96f9f982762f12dfb1f621b39fd4c9d5c76d52
(XSETFRAME): Use pseudovector.

diff -r 2e96f9f98276 -r e4a6f55757a9 src/frame.h
--- a/src/frame.h	Fri Dec 30 01:37:53 1994 +0000
+++ b/src/frame.h	Fri Dec 30 01:41:27 1994 +0000
@@ -267,7 +267,7 @@
 typedef struct frame *FRAME_PTR;
 
 #define XFRAME(p) ((struct frame *) XPNTR (p))
-#define XSETFRAME(p, v) XSET (p, Lisp_Frame, v)
+#define XSETFRAME(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FRAME))
 
 #define WINDOW_FRAME(w) (w)->frame