The expansion of ikeywords:defpackage lacked an EVAL-WHEN.

This resulted in compile-time package conflicts during file compilation. Unfortunately, REPL testing had not revealed this problem.
Hexstream · Nov 23, 2012 · 38a2c0f · 38a2c0f
1 parent 75ae1bb
commit 38a2c0f
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 3 deletions.
diff --git a/incognito-keywords.asd b/incognito-keywords.asd
@@ -7,9 +7,10 @@
 
   :description "incognito-keywords introduces a new kind of keyword that looks just like any non-keyword symbol and allows safe usage of convenient but clashy symbol names by multiple libraries without conflicts through sharing. Some names that might benefit are (alist blist plist macro operator index &doc &decl &rest+ &destructure &ignored &ignorable)."
 
-  :depends-on (#:map-bind)
+  :depends-on (#:map-bind
+               #:enhanced-eval-when)
 
-  :version "1.0"
+  :version "1.0.1"
   :serial cl:t
   :components ((:file "package")
 	       (:file "main")))
diff --git a/main.lisp b/main.lisp
@@ -34,7 +34,8 @@
                 ((:nicknames :documentation :size)
                  option))))))
     `(progn
-       (mapcar #'ensure ',(reduce #'nconc (nreverse exported) :from-end t))
+       (enhanced-eval-when:eval-when t
+         (mapcar #'ensure ',(reduce #'nconc (nreverse exported) :from-end t)))
        (cl:defpackage ,name
          (:use #:ikeyword)
          ,@clauses))))