Mercurial > emacs
changeset 7765:688637ba31c5
(defvar_bool, defvar_int, defvar_lisp, defvar_lisp_nopro):
Delete third arg DOC.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 01 Jun 1994 20:37:42 +0000 |
| parents | fad00b057e50 |
| children | 4a427472e21f |
| files | src/lread.c |
| diffstat | 1 files changed, 4 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lread.c Wed Jun 01 20:36:08 1994 +0000 +++ b/src/lread.c Wed Jun 01 20:37:42 1994 +0000 @@ -1752,17 +1752,14 @@ } #endif /* NOTDEF */ -/* New replacement for DefIntVar; it ignores the doc string argument - on the assumption that make-docfile will handle that. */ /* Define an "integer variable"; a symbol whose value is forwarded to a C variable of type int. Sample call: */ /* DEFVARINT ("indent-tabs-mode", &indent_tabs_mode, "Documentation"); */ void -defvar_int (namestring, address, doc) +defvar_int (namestring, address) char *namestring; int *address; - char *doc; { Lisp_Object sym; sym = intern (namestring); @@ -1773,10 +1770,9 @@ NIL if address contains 0 */ void -defvar_bool (namestring, address, doc) +defvar_bool (namestring, address) char *namestring; int *address; - char *doc; { Lisp_Object sym; sym = intern (namestring); @@ -1786,10 +1782,9 @@ /* Similar but define a variable whose value is the Lisp Object stored at address. */ void -defvar_lisp (namestring, address, doc) +defvar_lisp (namestring, address) char *namestring; Lisp_Object *address; - char *doc; { Lisp_Object sym; sym = intern (namestring); @@ -1802,10 +1797,9 @@ since marking the same slot twice can cause trouble with strings. */ void -defvar_lisp_nopro (namestring, address, doc) +defvar_lisp_nopro (namestring, address) char *namestring; Lisp_Object *address; - char *doc; { Lisp_Object sym; sym = intern (namestring);