0.7.7.26:

[sbcl.git] / src / code / setf-funs.lisp

diff --git a/src/code/setf-funs.lisp b/src/code/setf-funs.lisp
index 16c0878..3e18ea6 100644 (file)
--- a/src/code/setf-funs.lisp
+++ b/src/code/setf-funs.lisp
@@ -48,7 +48,7 @@
            (res (compute-one-setter sym type))))))
     `(progn ,@(res))))
 
-); eval-when (compile eval)
+) ; EVAL-WHEN
 
 (define-setters ("COMMON-LISP")
   ;; Semantically silly...