mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-09 15:10:29 +02:00
* boot-9.scm (error-catching-loop): don't read a line from
current input when quit is encountered, the previous change fixes this too.
This commit is contained in:
parent
c7d97590d6
commit
1fbc60b2c3
2 changed files with 6 additions and 1 deletions
|
@ -1,3 +1,9 @@
|
|||
Tue May 13 02:48:49 1997 Gary Houston <ghouston@actrix.gen.nz>
|
||||
|
||||
* boot-9.scm (error-catching-loop): don't read a line from
|
||||
current input when quit is encountered, the previous change
|
||||
fixes this too.
|
||||
|
||||
Mon May 12 19:00:21 1997 Jim Blandy <jimb@floss.cyclic.com>
|
||||
|
||||
* boot-9.scm (scm-style-repl): After reading an expression,
|
||||
|
|
|
@ -2211,7 +2211,6 @@
|
|||
(lambda (key . args)
|
||||
(case key
|
||||
((quit)
|
||||
(read-line) ; discard trailing junk and linefeed.
|
||||
(force-output)
|
||||
(set! status args)
|
||||
#f)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue