Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
291c7e74
Commit
291c7e74
authored
Jan 13, 2001
by
Gerd Moellmann
Browse files
(write_c_args): Print newlines as spaces.
parent
1c0e6fa4
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
14 additions
and
7 deletions
+14
-7
lib-src/ChangeLog
lib-src/ChangeLog
+4
-0
lib-src/make-docfile.c
lib-src/make-docfile.c
+10
-7
No files found.
lib-src/ChangeLog
View file @
291c7e74
2001-01-13 Gerd Moellmann <gerd@gnu.org>
* make-docfile.c (write_c_args): Print newlines as spaces.
2001-01-06 Andrew Innes <andrewi@gnu.org>
* makefile.w32-in (clean): Delete $(COMPILER_TEMP_FILES) instead
...
...
lib-src/make-docfile.c
View file @
291c7e74
/* Generate doc-string file for GNU Emacs from source files.
Copyright (C) 1985, 86, 92, 93, 94, 97, 1999 Free Software Foundation, Inc.
Copyright (C) 1985, 86, 92, 93, 94, 97, 1999, 2000, 2001
Free Software Foundation, Inc.
This file is part of GNU Emacs.
...
...
@@ -300,10 +301,12 @@ write_c_args (out, func, buf, minargs, maxargs)
}
/* Print the C argument list as it would appear in lisp:
print underscores as hyphens, and print commas as spaces.
Collapse adjacent spaces into one. */
if
(
c
==
'_'
)
c
=
'-'
;
if
(
c
==
','
)
c
=
' '
;
print underscores as hyphens, and print commas and newlines
as spaces. Collapse adjacent spaces into one. */
if
(
c
==
'_'
)
c
=
'-'
;
else
if
(
c
==
','
||
c
==
'\n'
)
c
=
' '
;
/* In C code, `default' is a reserved word, so we spell it
`defalt'; unmangle that here. */
...
...
@@ -319,7 +322,7 @@ write_c_args (out, func, buf, minargs, maxargs)
in_ident
=
0
;
just_spaced
=
0
;
}
else
if
(
c
!=
' '
||
!
just_spaced
)
else
if
(
c
!=
' '
||
!
just_spaced
)
{
if
(
c
>=
'a'
&&
c
<=
'z'
)
/* Upcase the letter. */
...
...
@@ -327,7 +330,7 @@ write_c_args (out, func, buf, minargs, maxargs)
putc
(
c
,
out
);
}
just_spaced
=
(
c
==
' '
)
;
just_spaced
=
c
==
' '
;
need_space
=
0
;
}
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment