From cf611f0100d469d0c7a64a3b6b3dcdc7e1d7adf6 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Sun, 26 Mar 2000 14:09:59 +0000 Subject: [PATCH] (defvar_per_buffer): Use new macros for per-buffer variables. --- src/lread.c | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/lread.c b/src/lread.c index e1d601579f0..0eb7c486a37 100644 --- a/src/lread.c +++ b/src/lread.c @@ -3160,9 +3160,10 @@ defvar_per_buffer (namestring, address, type, doc) XMISCTYPE (val) = Lisp_Misc_Buffer_Objfwd; XBUFFER_OBJFWD (val)->offset = offset; XSYMBOL (sym)->value = val; - *(Lisp_Object *)(offset + (char *)&buffer_local_symbols) = sym; - *(Lisp_Object *)(offset + (char *)&buffer_local_types) = type; - if (XINT (*(Lisp_Object *)(offset + (char *)&buffer_local_flags)) == 0) + BUFFER_LOCAL_SYMBOL (offset) = sym; + BUFFER_LOCAL_TYPE (offset) = type; + + if (BUFFER_LOCAL_IDX (offset) == 0) /* Did a DEFVAR_PER_BUFFER without initializing the corresponding slot of buffer_local_flags */ abort (); -- 2.39.5