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.

---
 lux-scheme/source/program.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lux-scheme')

diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux
index 581145301..da6c1a943 100644
--- a/lux-scheme/source/program.lux
+++ b/lux-scheme/source/program.lux
@@ -163,7 +163,7 @@
   [(ffi.interface <name>
      (getValue [] java/lang/Object))
 
-   (`` (ffi.import (~~ (template.symbol ["program/" <name>]))
+   (`` (ffi.import (,, (template.symbol ["program/" <name>]))
          "[1]::[0]"
          (getValue [] java/lang/Object)))]
 
@@ -301,7 +301,7 @@
 
 (def (read host_object)
   (Reader java/lang/Object)
-  (`` (<| (~~ (with_template [<class>]
+  (`` (<| (,, (with_template [<class>]
                 [(case (ffi.as <class> host_object)
                    {.#Some host_object}
                    {try.#Success host_object}
@@ -311,7 +311,7 @@
                 [java/lang/Boolean] [java/lang/Long] [java/lang/Double] [java/lang/String]
                 [gnu/mapping/Procedure] [gnu/lists/U8Vector]
                 ))
-          (~~ (with_template [<class> <processing>]
+          (,, (with_template [<class> <processing>]
                 [(case (ffi.as <class> host_object)
                    {.#Some host_object}
                    {try.#Success (<| <processing> host_object)}
-- 
cgit v1.2.3