diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/spec/compositor/generation/function.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/spec/compositor/generation/function.lux b/stdlib/source/spec/compositor/generation/function.lux index e3112d799..fefe039f7 100644 --- a/stdlib/source/spec/compositor/generation/function.lux +++ b/stdlib/source/spec/compositor/generation/function.lux @@ -47,9 +47,9 @@ (def: #export (spec run) (-> Runner Test) - (do {@ r.monad} + (do {! r.monad} [[arity local functionS] ..function - partial-arity (|> r.nat (:: @ map (|>> (n.% arity) (n.max 1)))) + partial-arity (|> r.nat (:: ! map (|>> (n.% arity) (n.max 1)))) inputs (r.list arity r.safe-frac) #let [expectation (maybe.assume (list.nth (dec local) inputs)) inputsS (list@map (|>> synthesis.f64) inputs)]] |