diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/test/lux.lux | 14 | ||||
| -rw-r--r-- | stdlib/source/test/lux/meta/symbol.lux | 2 |
2 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux index a43e6a889..37d57a3ac 100644 --- a/stdlib/source/test/lux.lux +++ b/stdlib/source/test/lux.lux @@ -225,8 +225,8 @@ Test (all _.and (let [[module short] (/.symbol .example)] - (_.coverage [/.symbol /.prelude_module] - (and (text#= /.prelude_module module) + (_.coverage [/.symbol /.prelude] + (and (text#= /.prelude module) (text#= short "example")))) (let [[module short] (/.symbol ..example)] (_.coverage [/.module_separator] @@ -275,7 +275,7 @@ (code#= (code.text "5") (/.' "5")) (code#= (code.symbol ["" "example_symbol"]) (/.' example_symbol)) - (code#= (code.symbol [/.prelude_module "example_symbol"]) + (code#= (code.symbol [/.prelude "example_symbol"]) (/.' .example_symbol)) (code#= (code.symbol [..current_module "example_symbol"]) (/.' ..example_symbol)) @@ -305,7 +305,7 @@ (code#= (code.text "5") (/.` "5")) (code#= (code.symbol [..current_module "example_symbol"]) (/.` example_symbol)) - (code#= (code.symbol [/.prelude_module "example_symbol"]) + (code#= (code.symbol [/.prelude "example_symbol"]) (/.` .example_symbol)) (code#= (code.symbol [..current_module "example_symbol"]) (/.` ..example_symbol)) @@ -334,7 +334,7 @@ (code#= (code.text "5") (/.`' "5")) (code#= (code.symbol ["" "example_symbol"]) (/.`' example_symbol)) - (code#= (code.symbol [/.prelude_module "example_symbol"]) + (code#= (code.symbol [/.prelude "example_symbol"]) (/.`' .example_symbol)) (code#= (code.symbol [..current_module "example_symbol"]) (/.`' ..example_symbol)) @@ -1068,8 +1068,8 @@ (def: for_meta|Module_State (syntax (_ []) (do meta.monad - [prelude_module (meta.module .prelude_module)] - (in (list (code.bit (case (the .#module_state prelude_module) + [prelude (meta.module .prelude)] + (in (list (code.bit (case (the .#module_state prelude) {.#Active} false _ true))))))) diff --git a/stdlib/source/test/lux/meta/symbol.lux b/stdlib/source/test/lux/meta/symbol.lux index e37dc06a9..76bbb76c6 100644 --- a/stdlib/source/test/lux/meta/symbol.lux +++ b/stdlib/source/test/lux/meta/symbol.lux @@ -66,7 +66,7 @@ (let [(open "/#[0]") /.equivalence] (all _.and (_.property "Can obtain Symbol from a symbol." - (and (/#= [.prelude_module "yolo"] (.symbol .yolo)) + (and (/#= [.prelude "yolo"] (.symbol .yolo)) (/#= ["test/lux/meta/symbol" "yolo"] (.symbol ..yolo)) (/#= ["" "yolo"] (.symbol yolo)) (/#= ["library/lux/test" "yolo"] (.symbol library/lux/test.yolo))))))) |