summaryrefslogtreecommitdiff
path: root/src/lread.c
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2003-03-14 23:05:10 +0000
committerRichard M. Stallman <rms@gnu.org>2003-03-14 23:05:10 +0000
commit225c7a073290d64f90a5cd483697a03ce289ae1b (patch)
tree2bc749a5cb4793099f25a2d28e9706ad565dbadd /src/lread.c
parent194600a8fa08104045698f0a9be6d6c3fe8b8f7e (diff)
downloademacs-225c7a073290d64f90a5cd483697a03ce289ae1b.tar.gz
(read1): After #!, exit loop on eof.
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c
index 70f0a3f2f9b..dfbbfeaad1e 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2127,7 +2127,7 @@ read1 (readcharfun, pch, first_in_list)
{
/* #! appears at the beginning of an executable file.
Skip the first line. */
- while (c != '\n')
+ while (c != '\n' && c >= 0)
c = READCHAR;
goto retry;
}