From a6f04f38c0170e93e8f1ab2cfcde3cbf59f88b0b Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 17 Mar 2019 12:36:38 -0400
Subject: Added proper aliasing support to the new compiler.

Also improved aliasing support in the old compiler.---
 stdlib/source/lux.lux | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

(limited to 'stdlib/source/lux.lux')

diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index 2b99f51f8..549d63112 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -4841,12 +4841,7 @@
              (wrap (list)))
      #let [defs (list;map (: (-> Text Code)
                              (function (_ def)
-                               (` ("lux def" (~ (identifier$ ["" def]))
-                                   (~ (identifier$ [module-name def]))
-                                   [(~ cursor-code)
-                                    (#.Record (#Cons [[(~ cursor-code) (#.Tag ["lux" "alias"])]
-                                                      [(~ cursor-code) (#.Identifier [(~ (text$ module-name)) (~ (text$ def))])]]
-                                                     #Nil))]))))
+                               (` ("lux def alias" (~ (identifier$ ["" def])) (~ (identifier$ [module-name def]))))))
                           defs')
            openings (join-map (: (-> Openings (List Code))
                                  (function (_ [alias structs])
-- 
cgit v1.2.3