From 8468d5fbf5fcf7c0193ef26b1f8c091fefd5d9db Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Mon, 15 Jul 2013 14:41:07 +0200
Subject: Remove obsolete code.

---
 sb-eval2.lisp | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/sb-eval2.lisp b/sb-eval2.lisp
index 7fb09b2..6687ac3 100644
--- a/sb-eval2.lisp
+++ b/sb-eval2.lisp
@@ -5,8 +5,6 @@
 
 (in-package "SB-EVAL2")
 
-#+(or)
-(setq SB-EXT:*EVALUATOR-MODE* :interpret)
 
 (defstruct (environment (:constructor make-environment (parent
                                                         &optional (size 0)
@@ -25,10 +23,6 @@
 (defun lexical-with-nesting (lexical nesting)
   (make-lexical (lexical-name lexical) (lexical-offset lexical) nesting))
 
-(defstruct (box (:constructor make-box (value)))
-  value)
-(defun unbox (box) (box-value box))
-
 (defstruct (context (:constructor make-context (&optional parent)))
   parent
   (levelp nil :type boolean)
-- 
cgit v1.2.3