Mercurial > emacs
changeset 9439:539e7fe905ff
(internal_equal): Check the substructure.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 11 Oct 1994 07:46:34 +0000 |
parents | d9dc17134dde |
children | 5d7438b61dd5 |
files | src/fns.c |
diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fns.c Tue Oct 11 07:46:22 1994 +0000 +++ b/src/fns.c Tue Oct 11 07:46:34 1994 +0000 @@ -886,6 +886,7 @@ return (extract_float (o1) == extract_float (o2)) ? Qt : Qnil; #endif if (XTYPE (o1) != XTYPE (o2)) return Qnil; + if (MISCP (o1) && XMISC (o1)->type != XMISC (o2)->type) return Qnil; if (CONSP (o1) || OVERLAYP (o1)) { Lisp_Object v1;