From: Juho Snellman <jsnell@iki.fi>
Date: Wed, 28 Dec 2005 12:39:12 +0000 (+0000)
Subject: 0.9.8.1:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=cbfca6d8c90bfd249e6bee6e3d9bba88a56c0312;p=sbcl.git

0.9.8.1:
        Make LDB quit on a ^D from a TTY instead of just ignoring the EOF.

        * More consistent with the normal REPL
        * The old behaviour would occasionally cause an infinite loop
          of printing the LDB prompt, trying to read input, finding that
          the tty was closed, printing the prompt again, etc.
---

diff --git a/src/runtime/monitor.c b/src/runtime/monitor.c
index 69d0380..aff7720 100644
--- a/src/runtime/monitor.c
+++ b/src/runtime/monitor.c
@@ -453,14 +453,7 @@ sub_monitor(void)
         fflush(stdout);
         line = fgets(buf, sizeof(buf), ldb_in);
         if (line == NULL) {
-            if (isatty(ldb_in_fd)) {
-                putchar('\n');
-                continue;
-            }
-            else {
-                fprintf(stderr, "\nEOF on something other than a tty.\n");
-                exit(0);
-            }
+            exit(1);
         }
         ptr = line;
         if ((token = parse_token(&ptr)) == NULL)
diff --git a/version.lisp-expr b/version.lisp-expr
index 1784a09..d2970a3 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.9.8"
+"0.9.8.1"