mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 02:50:26 -08:00
Code Issues Projects Releases Wiki Activity

(DEFVAR_LISP, DEFVAR_LISP_NOPRO, DEFVAR_BOOL)

Browse source 
(DEFVAR_INT, DEFVAR_PER_BUFFER, DEFVAR_KBOARD):
Remove `DOC_STRINGS_IN_COMMENTS' cases.
This commit is contained in:
Miles Bader 2001-10-22 01:10:13 +00:00
parent a279f22fcf
commit eb3602912a
2 changed files with 6 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

17
src/lisp.h
View file

@ -1622,21 +1622,6 @@ extern void defvar_kboard P_ ((char *, int));
/* Macros we use to define forwarded Lisp variables.
These are used in the syms_of_FILENAME functions. */
#ifdef DOC_STRINGS_IN_COMMENTS
#define DEFVAR_LISP(lname, vname) defvar_lisp (lname, vname)
#define DEFVAR_LISP_NOPRO(lname, vname) defvar_lisp_nopro (lname, vname)
#define DEFVAR_BOOL(lname, vname) defvar_bool (lname, vname)
#define DEFVAR_INT(lname, vname) defvar_int (lname, vname)
#define DEFVAR_PER_BUFFER(lname, vname, type) \
defvar_per_buffer (lname, vname, type, 0)
#define DEFVAR_KBOARD(lname, vname) \
defvar_kboard (lname, \
(int)((char *)(&current_kboard->vname) \
- (char *)current_kboard))
#else /* not DOC_STRINGS_IN_COMMENTS */
#define DEFVAR_LISP(lname, vname, doc) defvar_lisp (lname, vname)
#define DEFVAR_LISP_NOPRO(lname, vname, doc) defvar_lisp_nopro (lname, vname)
#define DEFVAR_BOOL(lname, vname, doc) defvar_bool (lname, vname)
@ -1648,8 +1633,6 @@ extern void defvar_kboard P_ ((char *, int));
(int)((char *)(&current_kboard->vname) \
- (char *)current_kboard))
#endif /* not DOC_STRINGS_IN_COMMENTS */
/* Structure for recording Lisp call stack for backtrace purposes. */