# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 797231954 0
# Node ID 2642924d2d21a3e998b8ab906d7ea1148338f27f
# Parent  38aef18e8e3d69c025ce5d575725873f654d624a
(internal_equal): Use XMISCTYPE.

diff -r 38aef18e8e3d -r 2642924d2d21 src/fns.c
--- a/src/fns.c	Fri Apr 07 05:17:56 1995 +0000
+++ b/src/fns.c	Fri Apr 07 05:19:14 1995 +0000
@@ -955,7 +955,7 @@
       goto tail_recurse;
 
     case Lisp_Misc:
-      if (XMISC (o1)->type != XMISC (o2)->type)
+      if (XMISCTYPE (o1) != XMISCTYPE (o2))
 	return 0;
       if (OVERLAYP (o1))
 	{