/[emacs]/emacs/lib-src/make-docfile.c
ViewVC logotype

Diff of /emacs/lib-src/make-docfile.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.51 by monnier, Mon Jul 15 19:59:53 2002 UTC revision 1.52 by monnier, Mon Aug 19 21:47:38 2002 UTC
# Line 290  scan_keyword_or_put_char (ch, state) Line 290  scan_keyword_or_put_char (ch, state)
290              ch = getc (state->in_file);              ch = getc (state->in_file);
291            while (ch == ' ' || ch == '\n');            while (ch == ' ' || ch == '\n');
292    
293            /* Put back the non-whitespace character.  */            /* Output the open-paren we just read.  */
294              put_char (ch, state);
295    
296              /* Skip the function name and replace it with `fn'.  */
297              do
298                ch = getc (state->in_file);
299              while (ch != ' ' && ch != ')');
300              put_char ('f', state);
301              put_char ('n', state);
302              
303              /* Put back the last character.  */
304            ungetc (ch, state->in_file);            ungetc (ch, state->in_file);
305          }          }
306      }      }
# Line 425  write_c_args (out, func, buf, minargs, m Line 435  write_c_args (out, func, buf, minargs, m
435    int just_spaced = 0;    int just_spaced = 0;
436    int need_space = 1;    int need_space = 1;
437    
438    fprintf (out, "(%s", func);    fprintf (out, "(fn");
439    
440    if (*buf == '(')    if (*buf == '(')
441      ++buf;      ++buf;

Legend:
Removed from v.1.51  
changed lines
  Added in v.1.52

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26