From 784ac76f3f7afd15c231323e9e0905b62f74c1f2 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Sun, 21 Jul 2013 12:51:31 +0200
Subject: WARN instead of ERRORing out when encountering SETQ of a constant.

---
 sb-eval2.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sb-eval2.lisp b/sb-eval2.lisp
index cea08b2..67e6207 100644
--- a/sb-eval2.lisp
+++ b/sb-eval2.lisp
@@ -740,7 +740,7 @@
 
 (defun prevent-constant-modification (var)
   (when (globally-constant-p var)
-    (error "~S is a constant and thus can't be set." var)))
+    (warn "~S is a constant and thus can't be set." var)))
 
 (defvar *mode* :not-compile-time)
 
-- 
cgit v1.2.3