From: Jim Blandy <jimb@redhat.com>
Date: Mon, 5 Jul 1993 07:57:34 +0000 (+0000)
Subject: * intervals.c (intervals_equal): Test the return value of Fequal
X-Git-Tag: emacs-19.34~11856
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=375aa801bac081fcb10f105b73fd7fbd2c535567;p=emacs.git

* intervals.c (intervals_equal): Test the return value of Fequal
	against Qnil, not 0.
---

diff --git a/src/intervals.c b/src/intervals.c
index 3d30e21c3ee..1e57fd15632 100644
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -159,7 +159,7 @@ intervals_equal (i0, i1)
 
       /* i0 and i1 both have sym, but it has different values in each */
       i0_cdr = Fcdr (i0_cdr);
-      if (! Fequal (i1_val, Fcar (i0_cdr)))
+      if (NILP (Fequal (i1_val, Fcar (i0_cdr))))
 	return 0;
 
       i0_cdr = Fcdr (i0_cdr);