aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/spec/compositor/generation/function.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/spec/compositor/generation/function.lux')
-rw-r--r--stdlib/source/spec/compositor/generation/function.lux2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/source/spec/compositor/generation/function.lux b/stdlib/source/spec/compositor/generation/function.lux
index 9af307287..3de0301b8 100644
--- a/stdlib/source/spec/compositor/generation/function.lux
+++ b/stdlib/source/spec/compositor/generation/function.lux
@@ -46,7 +46,7 @@
(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))))
inputs (r.list arity r.safe-frac)