diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2013-07-21 12:51:31 +0200 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2013-07-21 12:51:31 +0200 |
| commit | 784ac76f3f7afd15c231323e9e0905b62f74c1f2 (patch) | |
| tree | 0b914a87175f50d22e651123dca7f9c05fa1ef47 | |
| parent | 2e85d07ffcfda35d3ba2adf3778303d37adc751c (diff) | |
WARN instead of ERRORing out when encountering SETQ of a constant.
| -rw-r--r-- | sb-eval2.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
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) |