mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
Jim Blandy 1991-01-26 03:29:36 +00:00
parent c11e5bbd2c
commit 772e200922
1 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib-src/make-docfile.c
View file

@ -147,7 +147,7 @@ write_c_args (out, buf, minargs, maxargs)
register char *p = buf; register char *p = buf;
int space = 0; int space = 0;
fprintf (out, "arguments:"); fprintf (out, "arguments: ");
while (*p) while (*p)
{ {
@ -300,8 +300,13 @@ scan_c_file (filename)
putc (037, outfile); putc (037, outfile);
putc (defvarflag ? 'V' : 'F', outfile); putc (defvarflag ? 'V' : 'F', outfile);
fprintf (outfile, "%s\n", buf); fprintf (outfile, "%s\n", buf);
read_c_string (infile, 1); c = read_c_string (infile, 1);
if (defunflag)
/* If this is a defun, find the arguments and print them. If
this function takes MANY or UNEVALLED args, then the C source
won't give the names of the arguments, so we shouldn't bother
trying to find them. */
if (defunflag && maxargs != -1)
{ {
char argbuf[1024], *p = argbuf; char argbuf[1024], *p = argbuf;
while (c != ')') while (c != ')')