From 2dbbaaec93a53f8dd0b96a0028b9cf125c9066cd Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Sep 2021 15:39:55 -0400
Subject: Re-named \ => # && \\ => ##

---
 stdlib/source/test/aedifex/runtime.lux | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

(limited to 'stdlib/source/test/aedifex/runtime.lux')

diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux
index 77f7bcbed..fb94da435 100644
--- a/stdlib/source/test/aedifex/runtime.lux
+++ b/stdlib/source/test/aedifex/runtime.lux
@@ -7,14 +7,14 @@
      [\\specification
       ["$[0]" equivalence]]]
     [control
-     ["[0]" maybe ("[1]\[0]" functor)]]
+     ["[0]" maybe ("[1]#[0]" functor)]]
     [data
-     ["[0]" text ("[1]\[0]" equivalence)]
+     ["[0]" text ("[1]#[0]" equivalence)]
      [collection
-      ["[0]" list ("[1]\[0]" functor)]
+      ["[0]" list ("[1]#[0]" functor)]
       ["[0]" set]]]
     [math
-     ["[0]" random {"+" [Random]} ("[1]\[0]" monad)]
+     ["[0]" random {"+" [Random]} ("[1]#[0]" monad)]
      [number
       ["n" nat]]]]]
   [\\program
@@ -23,11 +23,11 @@
 (def: .public random
   (Random /.Runtime)
   ($_ random.either
-      (random\in /.default_java)
-      (random\in /.default_js)
-      (random\in /.default_python)
-      (random\in /.default_lua)
-      (random\in /.default_ruby)
+      (random#in /.default_java)
+      (random#in /.default_js)
+      (random#in /.default_python)
+      (random#in /.default_lua)
+      (random#in /.default_ruby)
       ))
 
 (def: .public test
@@ -44,7 +44,7 @@
                 (~~ (template [<command>]
                       [(_.cover [/.default_java /.default_js /.default_python /.default_lua /.default_ruby]
                                 (let [listing (|> (list /.default_java /.default_js /.default_python /.default_lua /.default_ruby)
-                                                  (list\each (value@ /.#program)))
+                                                  (list#each (value@ /.#program)))
                                       unique (set.of_list text.hash listing)]
                                   (n.= (list.size listing)
                                        (set.size unique))))]
@@ -57,11 +57,11 @@
                       ))
                 (_.cover [/.for]
                          (let [runtime' (/.for runtime path)]
-                           (and (text\= (value@ /.#program runtime)
+                           (and (text#= (value@ /.#program runtime)
                                         (value@ /.#program runtime'))
                                 (|> runtime'
                                     (value@ /.#parameters)
                                     list.last
-                                    (maybe\each (text\= path))
+                                    (maybe#each (text#= path))
                                     (maybe.else false)))))
                 )))))
-- 
cgit v1.2.3