diff options
Diffstat (limited to 'stdlib/source/test/lux/macro')
| -rw-r--r-- | stdlib/source/test/lux/macro/code.lux | 4 | ||||
| -rw-r--r-- | stdlib/source/test/lux/macro/local.lux | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/lux/macro/code.lux b/stdlib/source/test/lux/macro/code.lux index 2ce231e61..1a99aae83 100644 --- a/stdlib/source/test/lux/macro/code.lux +++ b/stdlib/source/test/lux/macro/code.lux @@ -108,9 +108,9 @@ (do {! random.monad} [parts (..random_sequence replace_simulation)] (wrap [(/.record (let [parts' (list\map product.left parts)] - (list.zip/2 parts' parts'))) + (list.zipped/2 parts' parts'))) (/.record (let [parts' (list\map product.right parts)] - (list.zip/2 parts' parts')))])) + (list.zipped/2 parts' parts')))])) ))))) (def: for_format diff --git a/stdlib/source/test/lux/macro/local.lux b/stdlib/source/test/lux/macro/local.lux index cbe6f0e3a..65e8e62f5 100644 --- a/stdlib/source/test/lux/macro/local.lux +++ b/stdlib/source/test/lux/macro/local.lux @@ -49,7 +49,7 @@ (macro.with_gensyms [g!output] (do meta.monad [pop! (/.push (list [name (..constant constant)])) - [module short] (meta.normalize name) + [module short] (meta.normal name) _ (if pre_remove (let [remove_macro! (: (-> .Module .Module) (update@ #.definitions (plist.remove short)))] |