From: Kevin Rosenberg <kevin@rosenberg.net>
Date: Thu, 12 May 2005 21:47:12 +0000 (+0000)
Subject: 0.9.0.29:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=cd683d6d402b84a79fbb248d52047b59df7f8d38;p=sbcl.git

0.9.0.29:
	* contrib/sb-aclrepl/repl.lisp: Use new toplevel catch rather than
	attempt to use the removed toplevel restart handler.
---

diff --git a/contrib/sb-aclrepl/repl.lisp b/contrib/sb-aclrepl/repl.lisp
index 9744e68..41c685d 100644
--- a/contrib/sb-aclrepl/repl.lisp
+++ b/contrib/sb-aclrepl/repl.lisp
@@ -622,7 +622,7 @@
   (values))
 
 (defun reset-cmd ()
-  (invoke-restart-interactively (find-restart 'sb-impl::toplevel)))
+  (throw 'sb-impl::toplevel-catcher nil))
 
 (defun dirs-cmd ()
   (dolist (dir *dir-stack*)
diff --git a/version.lisp-expr b/version.lisp-expr
index d1c3ff0..1808bfb 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.0.28"
+"0.9.0.29"