summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <code@mail.matthias.benkard.de>2013-07-21 12:04:26 +0200
committerMatthias Andreas Benkard <code@mail.matthias.benkard.de>2013-07-21 12:04:26 +0200
commit5057e340c9d3a947b11895f692f61d7f1b614cf6 (patch)
treec662e034e1e7e6f676e322c0c916334195bbbd9a
parentae8e60d3c54eed0d8e612c8b8471066856b3787b (diff)
PREPARE-REF: Check BOUNDPness of variables prior to access.
-rw-r--r--sb-eval2.lisp2
1 files changed, 2 insertions, 0 deletions
diff --git a/sb-eval2.lisp b/sb-eval2.lisp
index aa9735e..b6aa7a9 100644
--- a/sb-eval2.lisp
+++ b/sb-eval2.lisp
@@ -282,6 +282,8 @@
(assume-special context var)
(lambda (env)
(declare (ignore env))
+ (unless (boundp var)
+ (error 'unbound-variable :name var))
(symbol-value var)))))