Re-named "::" and ":::" macros to "\" and "\\", to be consistent with the convention that only macros that deal with types may start with a colon.

1 files changed, 7 insertions, 7 deletions

diff --git a/stdlib/source/lux/host.old.lux b/stdlib/source/lux/host.old.lux
index 896e5758d..8bc8cbea0 100644
--- a/stdlib/source/lux/host.old.lux
+++ b/stdlib/source/lux/host.old.lux
@@ -671,7 +671,7 @@
   ($_ p.or
       (s.this! (' #volatile))
       (s.this! (' #final))
-      (:: p.monad wrap [])))
+      (\ p.monad wrap [])))
 
 (def: (field-decl^ type-vars)
   (-> (List Type-Parameter) (Parser [Member-Declaration FieldDecl]))
@@ -1416,7 +1416,7 @@
         (wrap [arg-inputs arg-classes arg-types])))
 
     _
-    (:: meta.monad wrap [(list) (list) (list)])))
+    (\ meta.monad wrap [(list) (list) (list)])))
 
 (def: (decorate-return-maybe member return-term)
   (-> Import-Member-Declaration Code Code)
@@ -1648,9 +1648,9 @@
   (let [class-name (sanitize class-name)]
     (case (load-class class-name)
       (#.Right class)
-      (:: meta.monad wrap (if (interface? class)
-                            #Interface
-                            #Class))
+      (\ meta.monad wrap (if (interface? class)
+                           #Interface
+                           #Class))
 
       (#.Left _)
       (meta.fail (format "Unknown class: " class-name)))))
@@ -1746,10 +1746,10 @@
 (def: (type->class-name type)
   (-> Type (Meta Text))
   (if (type\= Any type)
-    (:: meta.monad wrap "java.lang.Object")
+    (\ meta.monad wrap "java.lang.Object")
     (case type
       (#.Primitive name params)
-      (:: meta.monad wrap name)
+      (\ meta.monad wrap name)
 
       (#.Apply A F)
       (case (type.apply (list A) F)