Update of /project/movitz/cvsroot/movitz/losp/lib In directory common-lisp.net:/tmp/cvs-serv6696

Modified Files: repl.lisp Log Message: Make *repl-readline-context* be nil by default, so we don't get unbound errors (that tend to recurse, since the debugger will want to reference this variable).

Date: Sat Sep 25 17:25:54 2004 Author: ffjeld

Index: movitz/losp/lib/repl.lisp diff -u movitz/losp/lib/repl.lisp:1.12 movitz/losp/lib/repl.lisp:1.13 --- movitz/losp/lib/repl.lisp:1.12 Thu Jul 22 00:29:20 2004 +++ movitz/losp/lib/repl.lisp Sat Sep 25 17:25:53 2004 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld frodef@acm.org ;;;; Created at: Wed Mar 19 14:58:12 2003 ;;;; -;;;; $Id: repl.lisp,v 1.12 2004/07/21 22:29:20 ffjeld Exp $ +;;;; $Id: repl.lisp,v 1.13 2004/09/25 15:25:53 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------

@@ -35,7 +35,7 @@ (defparameter *repl-prompter* 'default-repl-prompter) (defparameter *repl-prompt-context* nil) (defparameter *repl-print-format* "~@{~&~W~}") -(defvar *repl-readline-context*) +(defvar *repl-readline-context* nil) (defvar *repl-consless* nil)

(defun default-repl-prompter ()