summaryrefslogtreecommitdiff
path: root/src/fns.c
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-08-14 03:50:26 +0000
committerRichard M. Stallman <rms@gnu.org>1993-08-14 03:50:26 +0000
commit5843fef34696e776b9605735b1e24c98bfc89b3a (patch)
tree4c256a7bd29420dc2d8bd197e2c1422cafc3458b /src/fns.c
parentba2700dbbee127141f9c42ae70287d58ab071269 (diff)
downloademacs-5843fef34696e776b9605735b1e24c98bfc89b3a.tar.gz
(internal_equal): All markers in no buffer are equal.
Diffstat (limited to 'src/fns.c')
-rw-r--r--src/fns.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/fns.c b/src/fns.c
index 192711ec27c..556aaa38f28 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -870,9 +870,10 @@ do_cdr:
}
if (XTYPE (o1) == Lisp_Marker)
{
- return (XMARKER (o1)->buffer == XMARKER (o2)->buffer
- && XMARKER (o1)->bufpos == XMARKER (o2)->bufpos)
- ? Qt : Qnil;
+ return ((XMARKER (o1)->buffer == XMARKER (o2)->buffer
+ && (NILP (XMARKER (o1)->buffer)
+ || XMARKER (o1)->bufpos == XMARKER (o2)->bufpos))
+ ? Qt : Qnil);
}
if (XTYPE (o1) == Lisp_Vector
|| XTYPE (o1) == Lisp_Compiled)