From 4433c9bcd6c6cac44c018aad2e21a5b4d7cc4896 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 29 Nov 2017 22:49:56 -0400
Subject: - Adapted main codebase to the latest syntatic changes.

---
 new-luxc/source/luxc/lang/analysis/primitive.lux | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

(limited to 'new-luxc/source/luxc/lang/analysis/primitive.lux')

diff --git a/new-luxc/source/luxc/lang/analysis/primitive.lux b/new-luxc/source/luxc/lang/analysis/primitive.lux
index 9124ca271..8270e7e73 100644
--- a/new-luxc/source/luxc/lang/analysis/primitive.lux
+++ b/new-luxc/source/luxc/lang/analysis/primitive.lux
@@ -1,4 +1,4 @@
-(;module:
+(.module:
   lux
   (lux (control monad)
        [macro]
@@ -11,20 +11,20 @@
 (do-template [<name> <type> <tag>]
   [(def: #export (<name> value)
      (-> <type> (Meta Analysis))
-     (do macro;Monad<Meta>
-       [_ (&;infer <type>)]
+     (do macro.Monad<Meta>
+       [_ (&.infer <type>)]
        (wrap (<tag> value))))]
 
-  [analyse-bool Bool code;bool]
-  [analyse-nat  Nat  code;nat]
-  [analyse-int  Int  code;int]
-  [analyse-deg  Deg  code;deg]
-  [analyse-frac Frac code;frac]
-  [analyse-text Text code;text]
+  [analyse-bool Bool code.bool]
+  [analyse-nat  Nat  code.nat]
+  [analyse-int  Int  code.int]
+  [analyse-deg  Deg  code.deg]
+  [analyse-frac Frac code.frac]
+  [analyse-text Text code.text]
   )
 
 (def: #export analyse-unit
   (Meta Analysis)
-  (do macro;Monad<Meta>
-    [_ (&;infer Unit)]
+  (do macro.Monad<Meta>
+    [_ (&.infer Unit)]
     (wrap (` []))))
-- 
cgit v1.2.3