- All analysis procedures have been turned into extensions.

1 files changed, 5 insertions, 3 deletions

diff --git a/new-luxc/source/luxc/lang/analysis/expression.lux b/new-luxc/source/luxc/lang/analysis/expression.lux
index 1463e7ec5..d19e98bd8 100644
--- a/new-luxc/source/luxc/lang/analysis/expression.lux
+++ b/new-luxc/source/luxc/lang/analysis/expression.lux
@@ -13,14 +13,14 @@
         (lang ["&." module]
               [".L" host]
               [".L" macro]
+              [".L" extension]
               ["la" analysis]
               (translation [".T" common])))
   (// [".A" common]
       [".A" function]
       [".A" primitive]
       [".A" reference]
-      [".A" structure]
-      [".A" procedure]))
+      [".A" structure]))
 
 (exception: #export Macro-Expression-Must-Have-Single-Expansion)
 (exception: #export Unrecognized-Syntax)
@@ -64,7 +64,9 @@
                (referenceA.analyse-reference reference)
 
                (^ (#.Form (list& [_ (#.Text proc-name)] proc-args)))
-               (procedureA.analyse-procedure analyse eval proc-name proc-args)
+               (do macro.Monad<Meta>
+                 [procedure (extensionL.find-analysis proc-name)]
+                 (procedure analyse eval proc-args))
 
                (^template [<tag> <analyser>]
                  (^ (#.Form (list& [_ (<tag> tag)]