X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcondition.lisp;h=594b3ac33eb2874517ad399d5c82a9058df2de43;hb=05e9b542c5700416b8fd9f3ba9bb91bb6ab84b3a;hp=d2762ec0b883bc238f98a61f64518da9673e84ac;hpb=49095724dfe553133b0e85e68497245b02536619;p=sbcl.git

diff --git a/src/code/condition.lisp b/src/code/condition.lisp
index d2762ec..594b3ac 100644
--- a/src/code/condition.lisp
+++ b/src/code/condition.lisp
@@ -900,6 +900,9 @@
           (unless (null (cdr rs))
             (terpri s)))))))
 
+(define-condition simple-reference-error (reference-condition simple-error)
+  ())
+
 (define-condition duplicate-definition (reference-condition warning)
   ((name :initarg :name :reader duplicate-definition-name))
   (:report (lambda (c s)