From b96beb587c11fcfbce86ce2d62351600cf6cad1b Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 2 Jul 2022 05:38:27 -0400
Subject: More traditional names for unquoting macros.

---
 stdlib/source/specification/compositor/analysis/type.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'stdlib/source/specification/compositor/analysis')

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>)
-- 
cgit v1.2.3