From 6eb57a31fd2647626ef301b827c9a99ef0f2a484 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 13 Sep 2021 20:51:08 -0400
Subject: Re-named "primitive" to "Primitive".

---
 stdlib/source/library/lux.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'stdlib/source/library/lux.lux')

diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux
index 6eb000a79..9aed7e4de 100644
--- a/stdlib/source/library/lux.lux
+++ b/stdlib/source/library/lux.lux
@@ -659,7 +659,7 @@
  .public)
 
 ... (type: .public Macro
-...   (primitive "#Macro"))
+...   (Primitive "#Macro"))
 ("lux def" Macro
  ("lux type check type"
   {#Named [..prelude_module "Macro"]
@@ -1642,7 +1642,7 @@
              (in [meta output']))}
           [replace? token]))
 
-(macro:' .public (primitive tokens)
+(macro:' .public (Primitive tokens)
          ({{#Item [_ {#Text class_name}] {#End}}
            (in_meta (list (variant$ (list (identifier$ [..prelude_module "#Primitive"]) (text$ class_name) |#End|))))
 
@@ -1650,7 +1650,7 @@
            (in_meta (list (variant$ (list (identifier$ [..prelude_module "#Primitive"]) (text$ class_name) (untemplated_list params)))))
 
            _
-           (failure "Wrong syntax for primitive")}
+           (failure "Wrong syntax for Primitive")}
           tokens))
 
 (def:'' .private (current_module_name state)
@@ -4993,9 +4993,9 @@
 (def: (recursive_type g!self g!dummy name body)
   (-> Code Code Text Code Code)
   (` ((.All ((~ g!self) (~ g!dummy))
-        (~ (let$ (local_identifier$ name) (` {.#Apply (..primitive "") (~ g!self)})
+        (~ (let$ (local_identifier$ name) (` {.#Apply (..Primitive "") (~ g!self)})
                  body)))
-      (..primitive ""))))
+      (..Primitive ""))))
 
 (macro: .public (Rec tokens)
   (case tokens
-- 
cgit v1.2.3