diff options
Diffstat (limited to 'stdlib/source/test/lux/control/parser/binary.lux')
-rw-r--r-- | stdlib/source/test/lux/control/parser/binary.lux | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/stdlib/source/test/lux/control/parser/binary.lux b/stdlib/source/test/lux/control/parser/binary.lux index 965c9abad..73c94aa76 100644 --- a/stdlib/source/test/lux/control/parser/binary.lux +++ b/stdlib/source/test/lux/control/parser/binary.lux @@ -2,44 +2,44 @@ [library [lux {"-" [primitive]} ["_" test {"+" [Test]}] - ["." type] + ["[0]" type] [abstract [equivalence {"+" [Equivalence]}] [predicate {"+" [Predicate]}] [monad {"+" [do]}]] [control [pipe {"+" [case>]}] - ["." maybe] - ["." try] - ["." exception] + ["[0]" maybe] + ["[0]" try] + ["[0]" exception] ["<>" parser]] [data - ["." binary] - ["." sum] - ["." bit] - ["." name] - ["." text ("#\." equivalence) + ["[0]" binary] + ["[0]" sum] + ["[0]" bit] + ["[0]" name] + ["[0]" text ("[1]\[0]" equivalence) ["%" format {"+" [format]}] [encoding - ["." utf8]]] - ["." format "_" - ["#" binary]] + ["[0]" utf8]]] + ["[0]" format "_" + ["[1]" binary]] [collection - ["." list] - ["." row] - ["." set]]] + ["[0]" list] + ["[0]" row] + ["[0]" set]]] [macro - ["." code]] + ["[0]" code]] [math - ["." random {"+" [Random]}] + ["[0]" random {"+" [Random]}] [number ["n" nat] - ["." i64] - ["." int] - ["." rev] - ["." frac]]]]] + ["[0]" i64] + ["[0]" int] + ["[0]" rev] + ["[0]" frac]]]]] [\\library - ["." /]]) + ["[0]" /]]) (template: (!expect <expectation> <computation>) [(case <computation> @@ -115,7 +115,7 @@ (def: random_type (Random Type) - (let [(^open ".") random.monad] + (let [(^open "[0]") random.monad] ($_ random.either (in .Nat) (in .List) |