From 9c21fd1f33eb52fb971d493ad21a67036d68b841 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Jun 2022 02:29:28 -0400
Subject: Re-named the "poly" hierarchy to "polytypic".

---
 stdlib/source/program/aedifex/artifact/snapshot.lux | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'stdlib/source/program/aedifex/artifact/snapshot.lux')

diff --git a/stdlib/source/program/aedifex/artifact/snapshot.lux b/stdlib/source/program/aedifex/artifact/snapshot.lux
index 59053e368..7784faa1f 100644
--- a/stdlib/source/program/aedifex/artifact/snapshot.lux
+++ b/stdlib/source/program/aedifex/artifact/snapshot.lux
@@ -6,10 +6,11 @@
     [monad (.only do)]]
    [control
     ["<>" parser (.only)
-     ["<[0]>" xml (.only Parser)]
-     ["<[0]>" text]]]
+     ["<[0]>" xml (.only Parser)]]]
    [data
     ["[0]" sum]
+    ["[0]" text
+     ["<[1]>" \\parser]]
     [format
      ["[0]" xml (.only XML)]]]]]
  ["[0]" /
-- 
cgit v1.2.3