diff options
Diffstat (limited to 'stdlib/source/test/lux/control/parser/binary.lux')
-rw-r--r-- | stdlib/source/test/lux/control/parser/binary.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/control/parser/binary.lux b/stdlib/source/test/lux/control/parser/binary.lux index 3bf3363c9..e878f916f 100644 --- a/stdlib/source/test/lux/control/parser/binary.lux +++ b/stdlib/source/test/lux/control/parser/binary.lux @@ -91,10 +91,10 @@ (def: random_code (Random Code) (random.rec - (function (_ recur) + (function (_ again) (let [random_sequence (do [! random.monad] [size (# ! each (n.% 2) random.nat)] - (random.list size recur))] + (random.list size again))] ($_ random.and ..random_location (: (Random (Code' (Ann Location))) @@ -306,10 +306,10 @@ (format.or format.any)))) (/.result (: (/.Parser (List Nat)) (/.rec - (function (_ recur) + (function (_ again) (/.or /.any (<>.and /.nat - recur)))))) + again)))))) (!expect (^multi {try.#Success actual} (# (list.equivalence n.equivalence) = expected |