diff options
Diffstat (limited to 'stdlib/source/test/lux/debug.lux')
| -rw-r--r-- | stdlib/source/test/lux/debug.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux index 26023e7aa..17a0a1a31 100644 --- a/stdlib/source/test/lux/debug.lux +++ b/stdlib/source/test/lux/debug.lux @@ -60,7 +60,7 @@ [sample_bit random.bit sample_int random.int sample_frac random.frac - sample_text (random.upper_case 10) + sample_text (random.upper_cased 10) sample_nat random.nat sample_rev random.rev] (in (`` (and (,, (with_template [<type> <format> <sample>] @@ -204,7 +204,7 @@ [sample_bit random.bit sample_int random.int sample_frac random.frac - sample_text (random.upper_case 10)] + sample_text (random.upper_cased 10)] (_.coverage [/.inspection] (`` (and (,, (with_template [<format> <sample>] [(text#= (<format> <sample>) (/.inspection <sample>))] @@ -301,7 +301,7 @@ Test (<| (_.covering /._) (do random.monad - [expected_message (random.lower_case 5)] + [expected_message (random.lower_cased 5)] (all _.and ..inspection ..representation @@ -310,7 +310,7 @@ (and (exception.match? /.type_hole error) (text.contains? (%.type My_Text) error)))) (do random.monad - [foo (random.upper_case 10) + [foo (random.upper_cased 10) bar random.nat baz random.bit] (_.coverage [/.here] |