# HG changeset patch # User Steve Losh # Date 1530997496 0 # Node ID 57bdaf80a4488e5e478b4c6ff7d57679eadf5753 # Parent 6dbc64f70f9bc82bf53984302d82f0bea42e496c oops diff -r 6dbc64f70f9b -r 57bdaf80a448 src/functions.lisp --- 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`. diff -r 6dbc64f70f9b -r 57bdaf80a448 src/iterate.lisp --- 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)))