aboutsummaryrefslogtreecommitdiffstats
path: root/lib-src
diff options
context:
space:
mode:
authorPavel Janík2002-01-05 23:37:58 +0000
committerPavel Janík2002-01-05 23:37:58 +0000
commita00e9335a46b823fc4dc37807876ae381e64dd08 (patch)
tree19bcfbf004a2f81f925a288a367fa1ac44514da6 /lib-src
parentbae297c2a0ed131655da61db8b6e83a21ff9b285 (diff)
downloademacs-a00e9335a46b823fc4dc37807876ae381e64dd08.tar.gz
emacs-a00e9335a46b823fc4dc37807876ae381e64dd08.zip
Remove unnecessary whitespaces.
Diffstat (limited to 'lib-src')
-rw-r--r--lib-src/make-docfile.c30
1 files changed, 15 insertions, 15 deletions
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index 3d275fdd422..99da7b85186 100644
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -363,7 +363,7 @@ read_c_string_or_comment (infile, printflag, comment, saw_usage)
363 if (c == 't') 363 if (c == 't')
364 c = '\t'; 364 c = '\t';
365 } 365 }
366 366
367 if (c == ' ') 367 if (c == ' ')
368 state.pending_spaces++; 368 state.pending_spaces++;
369 else if (c == '\n') 369 else if (c == '\n')
@@ -387,19 +387,19 @@ read_c_string_or_comment (infile, printflag, comment, saw_usage)
387 c = getc (infile); 387 c = getc (infile);
388 break; 388 break;
389 } 389 }
390 390
391 scan_keyword_or_put_char ('*', &state); 391 scan_keyword_or_put_char ('*', &state);
392 } 392 }
393 else 393 else
394 { 394 {
395 if (c != '"') 395 if (c != '"')
396 break; 396 break;
397 397
398 /* If we had a "", concatenate the two strings. */ 398 /* If we had a "", concatenate the two strings. */
399 c = getc (infile); 399 c = getc (infile);
400 } 400 }
401 } 401 }
402 402
403 if (printflag < 0) 403 if (printflag < 0)
404 *state.buf_ptr = 0; 404 *state.buf_ptr = 0;
405 405
@@ -644,10 +644,10 @@ scan_c_file (filename, mode)
644 644
645 while (c == ' ' || c == '\n' || c == '\r' || c == '\t') 645 while (c == ' ' || c == '\n' || c == '\r' || c == '\t')
646 c = getc (infile); 646 c = getc (infile);
647 647
648 if (c == '"') 648 if (c == '"')
649 c = read_c_string_or_comment (infile, 0, 0, 0); 649 c = read_c_string_or_comment (infile, 0, 0, 0);
650 650
651 while (c != EOF && c != ',' && c != '/') 651 while (c != EOF && c != ',' && c != '/')
652 c = getc (infile); 652 c = getc (infile);
653 if (c == ',') 653 if (c == ',')
@@ -674,7 +674,7 @@ scan_c_file (filename, mode)
674 { 674 {
675 int comment = c != '"'; 675 int comment = c != '"';
676 int saw_usage; 676 int saw_usage;
677 677
678 putc (037, outfile); 678 putc (037, outfile);
679 putc (defvarflag ? 'V' : 'F', outfile); 679 putc (defvarflag ? 'V' : 'F', outfile);
680 fprintf (outfile, "%s\n", buf); 680 fprintf (outfile, "%s\n", buf);
@@ -704,7 +704,7 @@ scan_c_file (filename, mode)
704 goto eof; 704 goto eof;
705 c = getc (infile); 705 c = getc (infile);
706 } 706 }
707 707
708 /* Skip into arguments. */ 708 /* Skip into arguments. */
709 while (c != '(') 709 while (c != '(')
710 { 710 {
@@ -748,14 +748,14 @@ scan_c_file (filename, mode)
748 When we find that, we save it for the following defining-form, 748 When we find that, we save it for the following defining-form,
749 and we use that instead of reading a doc string within that defining-form. 749 and we use that instead of reading a doc string within that defining-form.
750 750
751 For defvar, defconst, and fset we skip to the docstring with a kludgy 751 For defvar, defconst, and fset we skip to the docstring with a kludgy
752 formatting convention: all docstrings must appear on the same line as the 752 formatting convention: all docstrings must appear on the same line as the
753 initial open-paren (the one in column zero) and must contain a backslash 753 initial open-paren (the one in column zero) and must contain a backslash
754 and a newline immediately after the initial double-quote. No newlines 754 and a newline immediately after the initial double-quote. No newlines
755 must appear between the beginning of the form and the first double-quote. 755 must appear between the beginning of the form and the first double-quote.
756 For defun, defmacro, and autoload, we know how to skip over the 756 For defun, defmacro, and autoload, we know how to skip over the
757 arglist, but the doc string must still have a backslash and newline 757 arglist, but the doc string must still have a backslash and newline
758 immediately after the double quote. 758 immediately after the double quote.
759 The only source files that must follow this convention are preloaded 759 The only source files that must follow this convention are preloaded
760 uncompiled ones like loaddefs.el and bindings.el; aside 760 uncompiled ones like loaddefs.el and bindings.el; aside
761 from that, it is always the .elc file that we look at, and they are no 761 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)
801 801
802 if (! buffer[0]) 802 if (! buffer[0])
803 fprintf (stderr, "## expected a symbol, got '%c'\n", c); 803 fprintf (stderr, "## expected a symbol, got '%c'\n", c);
804 804
805 skip_white (infile); 805 skip_white (infile);
806} 806}
807 807
@@ -945,7 +945,7 @@ scan_lisp_file (filename, mode)
945 c1 = c; 945 c1 = c;
946 c = getc (infile); 946 c = getc (infile);
947 } 947 }
948 948
949 /* If two previous characters were " and \, 949 /* If two previous characters were " and \,
950 this is a doc string. Otherwise, there is none. */ 950 this is a doc string. Otherwise, there is none. */
951 if (c2 != '"' || c1 != '\\') 951 if (c2 != '"' || c1 != '\\')
@@ -1004,7 +1004,7 @@ scan_lisp_file (filename, mode)
1004 c1 = c; 1004 c1 = c;
1005 c = getc (infile); 1005 c = getc (infile);
1006 } 1006 }
1007 1007
1008 /* If two previous characters were " and \, 1008 /* If two previous characters were " and \,
1009 this is a doc string. Otherwise, there is none. */ 1009 this is a doc string. Otherwise, there is none. */
1010 if (c2 != '"' || c1 != '\\') 1010 if (c2 != '"' || c1 != '\\')
@@ -1061,7 +1061,7 @@ scan_lisp_file (filename, mode)
1061 c1 = c; 1061 c1 = c;
1062 c = getc (infile); 1062 c = getc (infile);
1063 } 1063 }
1064 1064
1065 /* If two previous characters were " and \, 1065 /* If two previous characters were " and \,
1066 this is a doc string. Otherwise, there is none. */ 1066 this is a doc string. Otherwise, there is none. */
1067 if (c2 != '"' || c1 != '\\') 1067 if (c2 != '"' || c1 != '\\')