diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/test/lux/debug.lux | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux index d0292ab1a..4888bc61b 100644 --- a/stdlib/source/test/lux/debug.lux +++ b/stdlib/source/test/lux/debug.lux @@ -48,7 +48,7 @@ ["[1][0]" location] ["[1][0]" symbol]]]) -(def: can_represent_simple_types +(def can_represent_simple_types (Random Bit) (do random.monad [sample_bit random.bit @@ -70,7 +70,7 @@ [Text %.text sample_text])) ))))) -(def: can_represent_structure_types +(def can_represent_structure_types (Random Bit) (do random.monad [sample_bit random.bit @@ -103,7 +103,7 @@ ... )) ))))) -(def: can_represent_complex_types +(def can_represent_complex_types (Random Bit) (do random.monad [sample_ratio $//ratio.random @@ -127,7 +127,7 @@ [JSON %.json sample_json])) ))))) -(def: can_represent_time_types +(def can_represent_time_types (Random Bit) (do random.monad [sample_instant random.instant @@ -149,7 +149,7 @@ [Day %.day sample_day])) ))))) -(def: representation +(def representation Test (do random.monad [sample_bit random.bit @@ -192,7 +192,7 @@ (exception.match? /.cannot_represent_value error))) ))) -(def: inspection +(def inspection Test (do random.monad [sample_bit random.bit @@ -216,7 +216,7 @@ (/.inspection [sample_bit sample_int sample_frac sample_text])) ))))) -(def: macro_error +(def macro_error (syntax (_ [macro <code>.any]) (function (_ compiler) (case ((macro.expansion macro) compiler) @@ -229,7 +229,7 @@ (type: My_Text Text) -(def: .public test +(def .public test Test (<| (_.covering /._) (do random.monad |