diff options
| author | Pavel Janík | 2002-01-05 23:37:58 +0000 |
|---|---|---|
| committer | Pavel Janík | 2002-01-05 23:37:58 +0000 |
| commit | a00e9335a46b823fc4dc37807876ae381e64dd08 (patch) | |
| tree | 19bcfbf004a2f81f925a288a367fa1ac44514da6 /lib-src | |
| parent | bae297c2a0ed131655da61db8b6e83a21ff9b285 (diff) | |
| download | emacs-a00e9335a46b823fc4dc37807876ae381e64dd08.tar.gz emacs-a00e9335a46b823fc4dc37807876ae381e64dd08.zip | |
Remove unnecessary whitespaces.
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/make-docfile.c | 30 |
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 != '\\') |