Mercurial > hg > xemacs-beta
changeset 1618:1038bc1b8cb9
[xemacs-hg @ 2003-08-12 14:47:07 by james]
Andrew Begel's patch to make newlines prettier in DOC.
| author | james |
|---|---|
| date | Tue, 12 Aug 2003 14:47:07 +0000 |
| parents | 000fb15e7f54 |
| children | b0f57d54cba5 |
| files | lib-src/ChangeLog lib-src/make-docfile.c |
| diffstat | 2 files changed, 20 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lib-src/ChangeLog Tue Aug 12 06:36:38 2003 +0000 +++ b/lib-src/ChangeLog Tue Aug 12 14:47:07 2003 +0000 @@ -1,3 +1,8 @@ +2003-06-30 Andrew Begel <abegel@CS.Berkeley.EDU> + + * make-docfile.c (write_c_args): Escape newlines that arise in the + C argument list, and comment on synch with Emacs. + 2003-06-01 Steve Youngs <youngs@xemacs.org> * XEmacs 21.5.14 "cassava" is released.
--- a/lib-src/make-docfile.c Tue Aug 12 06:36:38 2003 +0000 +++ b/lib-src/make-docfile.c Tue Aug 12 14:47:07 2003 +0000 @@ -22,7 +22,7 @@ the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ -/* Synched up with: FSF 21.2. */ +/* Synched up with: FSF 21.3. */ /* The arguments given to this program are all the C and Lisp source files of XEmacs. .elc and .el and .c files are allowed. @@ -563,8 +563,9 @@ as spaces. Collapse adjacent spaces into one. */ if (c == '_') c = '-'; - else if (c == ',' || c == '\n') + else if (c == ',' /* || c == '\n' */) c = ' '; + /* XEmacs change: handle \n below for readability */ #if 0 /* In C code, `default' is a reserved word, so we spell it @@ -589,6 +590,18 @@ in_ident = 0; just_spaced = 0; } + /* XEmacs change: if the character is carriage return or linefeed, + escape it for the compiler */ + else if (c == '\n') + { + putc('\\', out); + putc('\n', out); + } + else if (c == '\r') + { + putc('\\', out); + putc('\r', out); + } else if (c != ' ' || !just_spaced) { if (c >= 'a' && c <= 'z')