aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/specification/compositor/analysis/type.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/specification/compositor/analysis/type.lux')
-rw-r--r--stdlib/source/specification/compositor/analysis/type.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/specification/compositor/analysis/type.lux b/stdlib/source/specification/compositor/analysis/type.lux
index abeed68de..edf3cc14b 100644
--- a/stdlib/source/specification/compositor/analysis/type.lux
+++ b/stdlib/source/specification/compositor/analysis/type.lux
@@ -24,7 +24,7 @@
(-> Expander State+ Text (List Code) Type Bit)
(|> (analysis/scope.with_scope ""
(analysis/type.with_type output_type
- (analysis.phase expander (` ((~ (code.text extension)) (~+ params))))))
+ (analysis.phase expander (` ((, (code.text extension)) (,* params))))))
(phase.result state)
(pipe.case
{try.#Success _}
@@ -36,7 +36,7 @@
(def check
(Random [Code Type Code])
(`` (all r.either
- (~~ (with_template [<random> <type> <code>]
+ (,, (with_template [<random> <type> <code>]
[(do r.monad
[value <random>]
(in [(` <type>)