diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 7 |
1 files changed, 4 insertions, 3 deletions
| @@ -870,9 +870,10 @@ do_cdr: | |||
| 870 | } | 870 | } |
| 871 | if (XTYPE (o1) == Lisp_Marker) | 871 | if (XTYPE (o1) == Lisp_Marker) |
| 872 | { | 872 | { |
| 873 | return (XMARKER (o1)->buffer == XMARKER (o2)->buffer | 873 | return ((XMARKER (o1)->buffer == XMARKER (o2)->buffer |
| 874 | && XMARKER (o1)->bufpos == XMARKER (o2)->bufpos) | 874 | && (NILP (XMARKER (o1)->buffer) |
| 875 | ? Qt : Qnil; | 875 | || XMARKER (o1)->bufpos == XMARKER (o2)->bufpos)) |
| 876 | ? Qt : Qnil); | ||
| 876 | } | 877 | } |
| 877 | if (XTYPE (o1) == Lisp_Vector | 878 | if (XTYPE (o1) == Lisp_Vector |
| 878 | || XTYPE (o1) == Lisp_Compiled) | 879 | || XTYPE (o1) == Lisp_Compiled) |