[movitz-cvs] CVS update: movitz/losp/lib/repl.lisp

[Frode Vatvedt Fjeld]

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 at 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 ()