Mercurial > hg > xemacs-beta
comparison src/symeval.h @ 420:41dbb7a9d5f2 r21-2-18
Import from CVS: tag r21-2-18
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:24:09 +0200 |
parents | 697ef44129c6 |
children | 11054d720c21 |
comparison
equal
deleted
inserted
replaced
419:66615b78f1a5 | 420:41dbb7a9d5f2 |
---|---|
291 /* Macros we use to define forwarded Lisp variables. | 291 /* Macros we use to define forwarded Lisp variables. |
292 These are used in the syms_of_FILENAME functions. */ | 292 These are used in the syms_of_FILENAME functions. */ |
293 | 293 |
294 void defvar_magic (CONST char *symbol_name, CONST struct symbol_value_forward *magic); | 294 void defvar_magic (CONST char *symbol_name, CONST struct symbol_value_forward *magic); |
295 | 295 |
296 #define symbol_value_forward_lheader_initializer { 1, { 0, 0, 0 } } | 296 #define symbol_value_forward_lheader_initializer { 1, 0, 0, 0 } |
297 | 297 |
298 #define DEFVAR_SYMVAL_FWD(lname, c_location, forward_type, magicfun) do { \ | 298 #define DEFVAR_SYMVAL_FWD(lname, c_location, forward_type, magicfun) do { \ |
299 static CONST_IF_NOT_DEBUG struct symbol_value_forward I_hate_C \ | 299 static CONST_IF_NOT_DEBUG struct symbol_value_forward I_hate_C \ |
300 = { { { symbol_value_forward_lheader_initializer, \ | 300 = { { { symbol_value_forward_lheader_initializer, \ |
301 (struct lcrecord_header *) (c_location), 69 }, \ | 301 (struct lcrecord_header *) (c_location), 69 }, \ |