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/program/aedifex/parser.lux | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

(limited to 'stdlib/source/program/aedifex/parser.lux')

diff --git a/stdlib/source/program/aedifex/parser.lux b/stdlib/source/program/aedifex/parser.lux
index b42553a8e..80eb1bfea 100644
--- a/stdlib/source/program/aedifex/parser.lux
+++ b/stdlib/source/program/aedifex/parser.lux
@@ -82,7 +82,7 @@
 (def: license
   (Parser /.License)
   (do [! <>.monad]
-    [input (\ ! each
+    [input (# ! each
               (dictionary.of_list text.hash)
               (<code>.tuple (<>.some (<>.and <code>.text
                                              <code>.any))))]
@@ -97,7 +97,7 @@
 (def: organization
   (Parser /.Organization)
   (do [! <>.monad]
-    [input (\ ! each
+    [input (# ! each
               (dictionary.of_list text.hash)
               (<code>.tuple (<>.some (<>.and <code>.text
                                              <code>.any))))]
@@ -108,7 +108,7 @@
 (def: developer
   (Parser /.Developer)
   (do [! <>.monad]
-    [input (\ ! each
+    [input (# ! each
               (dictionary.of_list text.hash)
               (<code>.tuple (<>.some (<>.and <code>.text
                                              <code>.any))))]
@@ -125,7 +125,7 @@
 (def: info
   (Parser /.Info)
   (do [! <>.monad]
-    [input (\ ! each
+    [input (# ! each
               (dictionary.of_list text.hash)
               (<code>.tuple (<>.some (<>.and <code>.text
                                              <code>.any))))]
@@ -181,7 +181,7 @@
 (def: profile
   (Parser /.Profile)
   (do [! <>.monad]
-    [input (\ ! each
+    [input (# ! each
               (dictionary.of_list text.hash)
               (<code>.tuple (<>.some (<>.and <code>.text
                                              <code>.any))))
@@ -196,19 +196,19 @@
                      (..singular input "info" ..info)))
            ^repositories (: (Parser (Set //repository.Address))
                             (|> (..plural input "repositories" ..repository)
-                                (\ ! each (set.of_list text.hash))
+                                (# ! each (set.of_list text.hash))
                                 (<>.else (set.empty text.hash))
-                                (\ ! each (set.has /.default_repository))))
+                                (# ! each (set.has /.default_repository))))
            ^dependencies (: (Parser (Set //dependency.Dependency))
                             (|> (..plural input "dependencies" ..dependency)
-                                (\ ! each (set.of_list //dependency.hash))
+                                (# ! each (set.of_list //dependency.hash))
                                 (<>.else (set.empty //dependency.hash))))
            ^compiler (|> ..dependency
                          (..singular input "compiler")
                          (<>.else /.default_compiler))
            ^sources (: (Parser (Set /.Source))
                        (|> (..plural input "sources" ..source)
-                           (\ ! each (set.of_list text.hash))
+                           (# ! each (set.of_list text.hash))
                            (<>.else (set.of_list text.hash (list /.default_source)))))
            ^target (: (Parser /.Target)
                       (|> ..target
@@ -221,7 +221,7 @@
                     (<>.maybe
                      (..singular input "test" ..module)))
            ^deploy_repositories (: (Parser (Dictionary Text //repository.Address))
-                                   (<| (\ ! each (dictionary.of_list text.hash))
+                                   (<| (# ! each (dictionary.of_list text.hash))
                                        (<>.else (list))
                                        (..singular input "deploy_repositories" ..deploy_repository)))
            ^java (|> ..runtime
@@ -260,7 +260,7 @@
 
 (def: .public project
   (Parser Project)
-  (\ <>.monad each
+  (# <>.monad each
      (dictionary.of_list text.hash)
      (<code>.tuple (<>.many (<>.and <code>.text
                                     ..profile)))))
-- 
cgit v1.2.3