diff options
Diffstat (limited to 'stdlib/source/test')
-rw-r--r-- | stdlib/source/test/lux.lux | 4 | ||||
-rw-r--r-- | stdlib/source/test/lux/control/parser/binary.lux | 2 | ||||
-rw-r--r-- | stdlib/source/test/lux/control/parser/type.lux | 2 | ||||
-rw-r--r-- | stdlib/source/test/lux/ffi.old.lux | 4 | ||||
-rw-r--r-- | stdlib/source/test/lux/target/jvm.lux | 2 | ||||
-rw-r--r-- | stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux | 2 |
6 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux index 3f1def248..e33bdf2f0 100644 --- a/stdlib/source/test/lux.lux +++ b/stdlib/source/test/lux.lux @@ -498,8 +498,8 @@ (same? expected_right actual_right)))) (_.cover [/.:of] (same? /.Nat (/.:of expected))) - (_.cover [/.primitive] - (case (/.primitive "foo" [expected/0 expected/1]) + (_.cover [/.Primitive] + (case (/.Primitive "foo" [expected/0 expected/1]) (^ {.#Primitive "foo" (list actual/0 actual/1)}) (and (same? expected/0 actual/0) (same? expected/1 actual/1)) diff --git a/stdlib/source/test/lux/control/parser/binary.lux b/stdlib/source/test/lux/control/parser/binary.lux index 73e3a8db8..f7809b34d 100644 --- a/stdlib/source/test/lux/control/parser/binary.lux +++ b/stdlib/source/test/lux/control/parser/binary.lux @@ -1,6 +1,6 @@ (.module: [library - [lux {"-" primitive} + [lux "*" ["_" test {"+" Test}] ["[0]" type] [abstract diff --git a/stdlib/source/test/lux/control/parser/type.lux b/stdlib/source/test/lux/control/parser/type.lux index c1773baf1..2fca448f8 100644 --- a/stdlib/source/test/lux/control/parser/type.lux +++ b/stdlib/source/test/lux/control/parser/type.lux @@ -1,6 +1,6 @@ (.module: [library - [lux {"-" primitive} + [lux "*" ["_" test {"+" Test}] [abstract [monad {"+" do}]] diff --git a/stdlib/source/test/lux/ffi.old.lux b/stdlib/source/test/lux/ffi.old.lux index b105ea38a..52703c219 100644 --- a/stdlib/source/test/lux/ffi.old.lux +++ b/stdlib/source/test/lux/ffi.old.lux @@ -222,9 +222,9 @@ test/lux/ffi/TestInterface::current (i.= (i.+ increase counter)))) (_.cover [/.type] - (and (type#= (primitive "java.lang.Char") + (and (type#= (Primitive "java.lang.Char") (/.type java/lang/Char)) - (type#= (primitive "java.util.List" [(primitive "java.lang.Byte")]) + (type#= (Primitive "java.util.List" [(Primitive "java.lang.Byte")]) (/.type (java/util/List java/lang/Byte))))) ))) diff --git a/stdlib/source/test/lux/target/jvm.lux b/stdlib/source/test/lux/target/jvm.lux index 509fddb6d..ed3916588 100644 --- a/stdlib/source/test/lux/target/jvm.lux +++ b/stdlib/source/test/lux/target/jvm.lux @@ -1,6 +1,6 @@ (.module: [library - [lux {"-" Type Label type primitive int} + [lux {"-" Type Primitive Label type int} ["[0]" ffi {"+" import:}] ["@" target] [abstract diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux index 7bcc5f59a..bbeae5033 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux @@ -1,5 +1,5 @@ (.module: - [lux {"-" primitive structure loop function} + [lux {"-" structure loop function} ["_" test {"+" Test}] [abstract [monad {"+" do}]] |