aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/specification/compositor/generation/case.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/specification/compositor/generation/case.lux')
-rw-r--r--stdlib/source/specification/compositor/generation/case.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/specification/compositor/generation/case.lux b/stdlib/source/specification/compositor/generation/case.lux
index 3bfcec4e8..d1d0074fd 100644
--- a/stdlib/source/specification/compositor/generation/case.lux
+++ b/stdlib/source/specification/compositor/generation/case.lux
@@ -85,9 +85,9 @@
[subS subP] case
.let [right? (tail? size idx)
caseS (synthesis.variant
- {#analysis.lefts idx
+ [#analysis.lefts idx
#analysis.right? right?
- #analysis.value subS})
+ #analysis.value subS])
caseP ($_ synthesis.path/seq
(if right?
(synthesis.side/right idx)