diff options
Diffstat (limited to 'lib-src/make-docfile.c')
| -rw-r--r-- | lib-src/make-docfile.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c index ba54202954b..3e79cae4f41 100644 --- a/lib-src/make-docfile.c +++ b/lib-src/make-docfile.c | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* Generate doc-string file for GNU Emacs from source files. | 1 | /* Generate doc-string file for GNU Emacs from source files. |
| 2 | Copyright (C) 1985-1986, 1992-1994, 1997, 1999-2011 | 2 | Copyright (C) 1985-1986, 1992-1994, 1997, 1999-2012 |
| 3 | Free Software Foundation, Inc. | 3 | Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | This file is part of GNU Emacs. | 5 | This file is part of GNU Emacs. |
| @@ -541,7 +541,7 @@ write_c_args (FILE *out, char *func, char *buf, int minargs, int maxargs) | |||
| 541 | maxargs--; | 541 | maxargs--; |
| 542 | 542 | ||
| 543 | /* In C code, `default' is a reserved word, so we spell it | 543 | /* In C code, `default' is a reserved word, so we spell it |
| 544 | `defalt'; unmangle that here. */ | 544 | `defalt'; demangle that here. */ |
| 545 | if (ident_length == 6 && strncmp (ident_start, "defalt", 6) == 0) | 545 | if (ident_length == 6 && strncmp (ident_start, "defalt", 6) == 0) |
| 546 | fprintf (out, "DEFAULT"); | 546 | fprintf (out, "DEFAULT"); |
| 547 | else | 547 | else |
| @@ -1149,8 +1149,10 @@ scan_lisp_file (const char *filename, const char *mode) | |||
| 1149 | } | 1149 | } |
| 1150 | } | 1150 | } |
| 1151 | 1151 | ||
| 1152 | /* defcustom can only occur in uncompiled Lisp files. */ | ||
| 1152 | else if (! strcmp (buffer, "defvar") | 1153 | else if (! strcmp (buffer, "defvar") |
| 1153 | || ! strcmp (buffer, "defconst")) | 1154 | || ! strcmp (buffer, "defconst") |
| 1155 | || ! strcmp (buffer, "defcustom")) | ||
| 1154 | { | 1156 | { |
| 1155 | char c1 = 0, c2 = 0; | 1157 | char c1 = 0, c2 = 0; |
| 1156 | type = 'V'; | 1158 | type = 'V'; |