Mercurial > hg > xemacs-beta

comparison src/lisp.h @ 5320:31be2a3d121d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Move Qcount, Q_default, Q_test to general-slots.h; add SYMBOL_KEYWORD_GENERAL() 2010-12-30 Aidan Kehoe <kehoea@parhasard.net> * elhash.c (syms_of_elhash): * chartab.c (syms_of_chartab): * abbrev.c (syms_of_abbrev): * general-slots.h: Move Qcount, Q_default, Q_test to general-slots.h, they're about to be used by other files. Rename Q_default to Q_default_, for the sake of the PARSE_KEYWORDS macro (given that default is a reserved identifier in C). Add SYMBOL_KEYWORD_GENERAL(), analogous to SYMBOL_GENERAL() to make this easier.
author Aidan Kehoe <kehoea@parhasard.net>
date Thu, 30 Dec 2010 00:50:10 +0000
parents c096d8051f89
children df125a42c50c
comparison
equal deleted inserted replaced
5319:ed5d4f081fa9 5320:31be2a3d121d
5303 EXFUN (Freally_free, 1); 5303 EXFUN (Freally_free, 1);
5304 5304
5305 /* Defined in general.c */ 5305 /* Defined in general.c */
5306 #define SYMBOL(fou) extern Lisp_Object fou 5306 #define SYMBOL(fou) extern Lisp_Object fou
5307 #define SYMBOL_MODULE_API(fou) extern MODULE_API Lisp_Object fou 5307 #define SYMBOL_MODULE_API(fou) extern MODULE_API Lisp_Object fou
5308 #define SYMBOL_KEYWORD(la_cle_est_fou) extern Lisp_Object la_cle_est_fou 5308 #define SYMBOL_KEYWORD(la_cle_est_folle) extern Lisp_Object la_cle_est_folle
5309 #define SYMBOL_GENERAL(tout_le_monde, est_fou) \ 5309 #define SYMBOL_GENERAL(tout_le_monde, est_fou) \
5310 extern Lisp_Object tout_le_monde 5310 extern Lisp_Object tout_le_monde
5311 #define SYMBOL_KEYWORD_GENERAL(y_compris_ben, mais_que_peut_on_faire) \
5312 extern Lisp_Object y_compris_ben
5311 5313
5312 #include "general-slots.h" 5314 #include "general-slots.h"
5313 5315
5314 #undef SYMBOL 5316 #undef SYMBOL
5315 #undef SYMBOL_MODULE_API 5317 #undef SYMBOL_MODULE_API
5316 #undef SYMBOL_KEYWORD 5318 #undef SYMBOL_KEYWORD
5317 #undef SYMBOL_GENERAL 5319 #undef SYMBOL_GENERAL
5320 #undef SYMBOL_KEYWORD_GENERAL
5318 5321
5319 extern Lisp_Object Qeq; 5322 extern Lisp_Object Qeq;
5320 extern Lisp_Object Qeql; 5323 extern Lisp_Object Qeql;
5321 extern Lisp_Object Qequal; 5324 extern Lisp_Object Qequal;
5322 extern Lisp_Object Qequalp; 5325 extern Lisp_Object Qequalp;