From d82a9b1166902ecca9a9a6eb3e1bb2195c73d9b7 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 1 Oct 2022 20:50:49 -0400
Subject: New format for extensions [part 2]

---
 stdlib/source/library/lux.lux | 14 +++++++++-----
 1 file changed, 9 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 249e77569..0d3c3c837 100644
--- a/stdlib/source/library/lux.lux
+++ b/stdlib/source/library/lux.lux
@@ -5878,8 +5878,12 @@
         _
         (failure (..wrong_syntax_error (symbol ..Rec)))))))
 
-(def .public Synthesis
-  (Primitive "#Synthesis"))
-
-(def .public Generation
-  (Primitive "#Generation"))
+(with_template [<type>]
+  [(def .public <type>
+     (let [[_ short] (symbol <type>)]
+       {.#Primitive (text#composite "#" short) (list)}))]
+
+  [Analysis]
+  [Synthesis]
+  [Generation]
+  )
-- 
cgit v1.2.3