diff options
author | Eduardo Julian | 2022-06-04 19:34:42 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-06-04 19:34:42 -0400 |
commit | f9e33ae96aec4741385a576719786092c9e68043 (patch) | |
tree | 140057dfc054346eab721f9905f0f0fff22ad933 /stdlib/source/test/lux/ffi.old.lux | |
parent | 56d2835d35093e2d92c5e8a4371aa322b55e037b (diff) |
De-sigil-ification: #
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/lux/ffi.old.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/test/lux/ffi.old.lux b/stdlib/source/test/lux/ffi.old.lux index e5f5ab8aa..ae5acc8a0 100644 --- a/stdlib/source/test/lux/ffi.old.lux +++ b/stdlib/source/test/lux/ffi.old.lux @@ -92,13 +92,13 @@ Test (do [! random.monad] [long random.int - int (# ! each (|>> /.long_to_int) random.int) - char (# ! each (|>> /.long_to_int /.int_to_char) random.int) + int (at ! each (|>> /.long_to_int) random.int) + char (at ! each (|>> /.long_to_int /.int_to_char) random.int) double (|> random.frac (random.only (|>> f.not_a_number? not))) float (|> random.frac (random.only (|>> f.not_a_number? not)) - (# ! each (|>> /.double_to_float)))] + (at ! each (|>> /.double_to_float)))] (`` (all _.and (~~ (template [<=> <sample> <to> <from>] [(_.coverage [<to> <from>] @@ -159,8 +159,8 @@ (def: arrays Test (do [! random.monad] - [size (|> random.nat (# ! each (|>> (n.% 100) (n.max 1)))) - idx (|> random.nat (# ! each (n.% size))) + [size (|> random.nat (at ! each (|>> (n.% 100) (n.max 1)))) + idx (|> random.nat (at ! each (n.% size))) value random.int] (all _.and (_.coverage [/.array /.length] |