--- a/src/functions.lisp Sun Jun 17 17:16:25 2018 -0700
+++ b/src/functions.lisp Sat Jul 07 21:04:56 2018 +0000
@@ -1,4 +1,4 @@
-(in-package :losh.control-flow)
+(in-package :losh.functions)
(defun juxt (&rest functions)
"Return a function that will juxtapose the results of `functions`.
--- a/src/iterate.lisp Sun Jun 17 17:16:25 2018 -0700
+++ b/src/iterate.lisp Sat Jul 07 21:04:56 2018 +0000
@@ -656,7 +656,7 @@
(defmacro-driver (FOR var IN-HASHSET hset)
(let ((kwd (if generate 'generate 'for)))
- `(,kwd (,var) :in-hashtable (hash-set-storage ,hset))))
+ `(,kwd (,var) :in-hashtable (losh.hash-sets::hash-set-storage ,hset))))
(defmacro-driver (FOR var RECURSIVELY expr INITIALLY init)
(let ((kwd (if generate 'generate 'for)))