Got the new compiler to build again.

1 files changed, 12 insertions, 4 deletions

diff --git a/stdlib/source/lux/tool/compiler/meta/archive/artifact.lux b/stdlib/source/lux/tool/compiler/meta/archive/artifact.lux
index 222bb2479..534749ace 100644
--- a/stdlib/source/lux/tool/compiler/meta/archive/artifact.lux
+++ b/stdlib/source/lux/tool/compiler/meta/archive/artifact.lux
@@ -11,8 +11,8 @@
 (type: #export ID Nat)
 
 (type: Artifact
-  (#Resource ID)
-  (#Definition [ID Text]))
+  {#id ID
+   #name (Maybe Text)})
 
 (abstract: #export Registry
   {}
@@ -33,7 +33,8 @@
        (|> registry
            :representation
            (update@ #next inc)
-           (update@ #artifacts (row.add (#Resource id)))
+           (update@ #artifacts (row.add {#id id
+                                         #name #.None}))
            :abstraction)]))
 
   (def: #export (definition name registry)
@@ -43,6 +44,13 @@
        (|> registry
            :representation
            (update@ #next inc)
-           (update@ #artifacts (row.add (#Definition id name)))
+           (update@ #artifacts (row.add {#id id
+                                         #name (#.Some name)}))
            :abstraction)]))
+
+  (def: #export (remember name registry)
+    (-> Text Registry (Maybe ID))
+    (|> (:representation registry)
+        (get@ #resolver)
+        (dictionary.get name)))
   )