diff options
author | Richard M. Stallman <rms@gnu.org> | 1993-08-14 03:50:26 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1993-08-14 03:50:26 +0000 |
commit | 5843fef34696e776b9605735b1e24c98bfc89b3a (patch) | |
tree | 4c256a7bd29420dc2d8bd197e2c1422cafc3458b /src/fns.c | |
parent | ba2700dbbee127141f9c42ae70287d58ab071269 (diff) | |
download | emacs-5843fef34696e776b9605735b1e24c98bfc89b3a.tar.gz |
(internal_equal): All markers in no buffer are equal.
Diffstat (limited to 'src/fns.c')
-rw-r--r-- | src/fns.c | 7 |
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) |