From 8d4c256f8b56561869c14df02db695d774c74fa6 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 24 Oct 2022 19:28:57 -0400
Subject: Minor naming & syntax improvements.

---
 stdlib/source/program/aedifex/artifact/time/date.lux | 4 ++--
 stdlib/source/program/aedifex/hash.lux               | 8 ++++----
 2 files changed, 6 insertions(+), 6 deletions(-)

(limited to 'stdlib/source/program')

diff --git a/stdlib/source/program/aedifex/artifact/time/date.lux b/stdlib/source/program/aedifex/artifact/time/date.lux
index d1f9a0899..f78a6c54d 100644
--- a/stdlib/source/program/aedifex/artifact/time/date.lux
+++ b/stdlib/source/program/aedifex/artifact/time/date.lux
@@ -18,7 +18,7 @@
      ["i" int]]]
    [meta
     [type
-     [primitive (.except)]]]
+     ["[0]" primitive (.except def)]]]
    [world
     [time
      ["[0]" date (.use "[1]#[0]" equivalence)]
@@ -41,7 +41,7 @@
          ["Maximum" (%.int ..max_year)]
          ["Year" (%.int (year.value year))])))
 
-(primitive .public Date
+(primitive.def .public Date
   date.Date
 
   (def .public epoch
diff --git a/stdlib/source/program/aedifex/hash.lux b/stdlib/source/program/aedifex/hash.lux
index d58f2d23e..fbbe69825 100644
--- a/stdlib/source/program/aedifex/hash.lux
+++ b/stdlib/source/program/aedifex/hash.lux
@@ -22,7 +22,7 @@
     [macro
      ["^" pattern]]
     [type
-     [primitive (.except)]]]]])
+     ["[0]" primitive (.except def)]]]]])
 
 ... TODO: Replace with pure-Lux implementations of these algorithms
 ... https://en.wikipedia.org/wiki/SHA-1#SHA-1_pseudocode
@@ -35,10 +35,10 @@
   ("static" getInstance [java/lang/String] java/security/MessageDigest)
   (digest [[byte]] [byte]))
 
-(primitive .public SHA1 Any)
-(primitive .public MD5 Any)
+(primitive.def .public SHA1 Any)
+(primitive.def .public MD5 Any)
 
-(primitive .public (Hash h)
+(primitive.def .public (Hash h)
   Binary
 
   (def .public data
-- 
cgit v1.2.3