# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 797232019 0
# Node ID 5fed07fb66fb85f05843e1b3769ea68eea6420cd
# Parent  2642924d2d21a3e998b8ab906d7ea1148338f27f
(print): Use XMISCTYPE.

diff -r 2642924d2d21 -r 5fed07fb66fb src/print.c
--- a/src/print.c	Fri Apr 07 05:19:14 1995 +0000
+++ b/src/print.c	Fri Apr 07 05:20:19 1995 +0000
@@ -987,7 +987,7 @@
 
 #ifndef standalone
     case Lisp_Misc:
-      switch (XMISC (obj)->type)
+      switch (XMISCTYPE (obj))
 	{
 	case Lisp_Misc_Marker:
 	  strout ("#<marker ", -1, printcharfun);
@@ -1091,7 +1091,7 @@
 	   Probably should just abort () */
 	strout ("#<EMACS BUG: INVALID DATATYPE ", -1, printcharfun);
 	if (MISCP (obj))
-	  sprintf (buf, "(MISC 0x%04x)", (int) XMISC (obj)->type);
+	  sprintf (buf, "(MISC 0x%04x)", (int) XMISCTYPE (obj));
 	else if (VECTORLIKEP (obj))
 	  sprintf (buf, "(PVEC 0x%08x)", (int) XVECTOR (obj)->size);
 	else