Mercurial > emacs

comparison src/data.c @ 50314:247bd25de9e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(store_symval_forwarding): Re-instate part of the code that was deleted with too much enthusiasm.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 26 Mar 2003 15:23:10 +0000
parents 77bee06b14c5
children bd83590b911a
comparison
equal deleted inserted replaced
50313:59ddec11881f 50314:247bd25de9e9
895 case Lisp_Misc_Buffer_Objfwd: 895 case Lisp_Misc_Buffer_Objfwd:
896 { 896 {
897 int offset = XBUFFER_OBJFWD (valcontents)->offset; 897 int offset = XBUFFER_OBJFWD (valcontents)->offset;
898 Lisp_Object type; 898 Lisp_Object type;
899 899
900 type = PER_BUFFER_TYPE (offset);
900 if (! NILP (type) && ! NILP (newval) 901 if (! NILP (type) && ! NILP (newval)
901 && XTYPE (newval) != XINT (type)) 902 && XTYPE (newval) != XINT (type))
902 buffer_slot_type_mismatch (offset); 903 buffer_slot_type_mismatch (offset);
903 904
904 if (buf == NULL) 905 if (buf == NULL)