(last_node): Make it a global variable.

[gnu-emacs] / lib-src / make-docfile.c

diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index 4ddfe736325f63adc045f9019e05096c64f7b7d1..99da7b851864114e8f48cae92ad7c118400533f7 100644 (file)
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -79,7 +79,7 @@ FILE *outfile;
 /* Name this program was invoked with.  */
 char *progname;
 
-/* Print error message.  `s1' is printf control string, `s2' is arg for it. */
+/* Print error message.  `s1' is printf control string, `s2' is arg for it.  */
 
 /* VARARGS1 */
 void
@@ -201,7 +201,7 @@ char buf[128];
 /* Some state during the execution of `read_c_string_or_comment'.  */
 struct rcsoc_state
 {
-  /* A count of spaces and newlines that have been read, but not output. */
+  /* A count of spaces and newlines that have been read, but not output.  */
   unsigned pending_spaces, pending_newlines;
 
   /* Where we're reading from.  */
@@ -280,7 +280,7 @@ scan_keyword_or_put_char (ch, state)
          /* Reset the scanning pointer.  */
          state->cur_keyword_ptr = state->keyword;
 
-         /* Canonicalize whitespace preceding a usage string. */
+         /* Canonicalize whitespace preceding a usage string.  */
          state->pending_newlines = 2;
          state->pending_spaces = 0;
 
@@ -363,7 +363,7 @@ read_c_string_or_comment (infile, printflag, comment, saw_usage)
              if (c == 't')
                c = '\t';
            }
-         
+
          if (c == ' ')
            state.pending_spaces++;
          else if (c == '\n')
@@ -387,19 +387,19 @@ read_c_string_or_comment (infile, printflag, comment, saw_usage)
              c = getc (infile);
              break;
            }
-         
+
          scan_keyword_or_put_char ('*', &state);
        }
       else
        {
          if (c != '"')
            break;
-      
+
          /* If we had a "", concatenate the two strings.  */
          c = getc (infile);
        }
     }
-  
+
   if (printflag < 0)
     *state.buf_ptr = 0;
 
@@ -526,7 +526,7 @@ scan_c_file (filename, mode)
       return 0;
     }
 
-  /* Reset extension to be able to detect duplicate files. */
+  /* Reset extension to be able to detect duplicate files.  */
   filename[strlen (filename) - 1] = extension;
 
   c = '\n';
@@ -644,10 +644,10 @@ scan_c_file (filename, mode)
 
       while (c == ' ' || c == '\n' || c == '\r' || c == '\t')
        c = getc (infile);
-      
+
       if (c == '"')
        c = read_c_string_or_comment (infile, 0, 0, 0);
-      
+
       while (c != EOF && c != ',' && c != '/')
        c = getc (infile);
       if (c == ',')
@@ -674,7 +674,7 @@ scan_c_file (filename, mode)
        {
          int comment = c != '"';
          int saw_usage;
-         
+
          putc (037, outfile);
          putc (defvarflag ? 'V' : 'F', outfile);
          fprintf (outfile, "%s\n", buf);
@@ -704,7 +704,7 @@ scan_c_file (filename, mode)
                      goto eof;
                    c = getc (infile);
                  }
-             
+
              /* Skip into arguments.  */
              while (c != '(')
                {
@@ -748,14 +748,14 @@ scan_c_file (filename, mode)
  When we find that, we save it for the following defining-form,
  and we use that instead of reading a doc string within that defining-form.
 
- For defvar, defconst, and fset we skip to the docstring with a kludgy 
+ For defvar, defconst, and fset we skip to the docstring with a kludgy
  formatting convention: all docstrings must appear on the same line as the
- initial open-paren (the one in column zero) and must contain a backslash 
+ initial open-paren (the one in column zero) and must contain a backslash
  and a newline immediately after the initial double-quote.  No newlines
  must appear between the beginning of the form and the first double-quote.
  For defun, defmacro, and autoload, we know how to skip over the
  arglist, but the doc string must still have a backslash and newline
- immediately after the double quote. 
+ immediately after the double quote.
  The only source files that must follow this convention are preloaded
  uncompiled ones like loaddefs.el and bindings.el; aside
  from that, it is always the .elc file that we look at, and they are no
@@ -801,7 +801,7 @@ read_lisp_symbol (infile, buffer)
 
   if (! buffer[0])
     fprintf (stderr, "## expected a symbol, got '%c'\n", c);
-  
+
   skip_white (infile);
 }
 
@@ -945,7 +945,7 @@ scan_lisp_file (filename, mode)
                  c1 = c;
                  c = getc (infile);
                }
-         
+
              /* If two previous characters were " and \,
                 this is a doc string.  Otherwise, there is none.  */
              if (c2 != '"' || c1 != '\\')
@@ -1004,7 +1004,7 @@ scan_lisp_file (filename, mode)
                  c1 = c;
                  c = getc (infile);
                }
-         
+
              /* If two previous characters were " and \,
                 this is a doc string.  Otherwise, there is none.  */
              if (c2 != '"' || c1 != '\\')
@@ -1061,7 +1061,7 @@ scan_lisp_file (filename, mode)
                  c1 = c;
                  c = getc (infile);
                }
-         
+
              /* If two previous characters were " and \,
                 this is a doc string.  Otherwise, there is none.  */
              if (c2 != '"' || c1 != '\\')