diff options
| author | Richard M. Stallman | 1995-04-13 16:05:43 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-04-13 16:05:43 +0000 |
| commit | 1feb8ae1f5de89da5e38b1764772b4effe1e2b0e (patch) | |
| tree | aba4f4bfc5f23bf85416a2cc279200ae98ac00bf | |
| parent | 0731825e49a03ee06473fcb398e21eed23721c78 (diff) | |
| download | emacs-1feb8ae1f5de89da5e38b1764772b4effe1e2b0e.tar.gz emacs-1feb8ae1f5de89da5e38b1764772b4effe1e2b0e.zip | |
(scan_c_file): At end, restore file name last char to its original value.
| -rw-r--r-- | lib-src/make-docfile.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c index df9c6e069f5..006600e162d 100644 --- a/lib-src/make-docfile.c +++ b/lib-src/make-docfile.c | |||
| @@ -322,8 +322,9 @@ scan_c_file (filename, mode) | |||
| 322 | register int defvarperbufferflag; | 322 | register int defvarperbufferflag; |
| 323 | register int defvarflag; | 323 | register int defvarflag; |
| 324 | int minargs, maxargs; | 324 | int minargs, maxargs; |
| 325 | int extension = filename[strlen (filename) - 1]; | ||
| 325 | 326 | ||
| 326 | if (filename[strlen (filename) - 1] == 'o') | 327 | if (extension == 'o') |
| 327 | filename[strlen (filename) - 1] = 'c'; | 328 | filename[strlen (filename) - 1] = 'c'; |
| 328 | 329 | ||
| 329 | infile = fopen (filename, mode); | 330 | infile = fopen (filename, mode); |
| @@ -335,6 +336,9 @@ scan_c_file (filename, mode) | |||
| 335 | return 0; | 336 | return 0; |
| 336 | } | 337 | } |
| 337 | 338 | ||
| 339 | /* Reset extension to be able to detect duplicate files. */ | ||
| 340 | filename[strlen (filename) - 1] = extension; | ||
| 341 | |||
| 338 | c = '\n'; | 342 | c = '\n'; |
| 339 | while (!feof (infile)) | 343 | while (!feof (infile)) |
| 340 | { | 344 | { |