- Put definition metadata into the generated .class files.

1 files changed, 6 insertions, 23 deletions

diff --git a/source/lux.lux b/source/lux.lux
index 2e5752592..2a4cc8660 100644
--- a/source/lux.lux
+++ b/source/lux.lux
@@ -1341,33 +1341,16 @@
     (-> ($' List ($' List a)) ($' List a)))
   (foldL list:++ #Nil xs))
 
-## (def'' #export (normalize ident)
-##   (-> Ident ($' Lux Ident))
-##   (_lux_case ident
-##          ["" name]
-##          (do Lux:Monad
-##            [module-name get-module-name]
-##            (;return (: Ident [module-name name])))
-
-##          _
-##          (return ident)))
-(def'' #export (normalize ident state)
+(def'' #export (normalize ident)
   (-> Ident ($' Lux Ident))
   (_lux_case ident
     ["" name]
-    (_lux_case state
-      {#source source #modules modules #module-aliases module-aliases
-       #envs   envs   #types   types   #host           host
-       #seed   seed}
-      (_lux_case (reverse envs)
-        #Nil
-        (#Left "Can't normalize Ident without a global environment.")
-
-        (#Cons [{#name prefix #inner-closures _ #locals _ #closure _} _])
-        (#Right [state [prefix name]])))
-    
+    (do Lux:Monad
+      [module-name get-module-name]
+      (;return (_lux_: Ident [module-name name])))
+
     _
-    (#Right [state ident])))
+    (return ident)))
 
 (defmacro #export (| tokens)
   (do Lux:Monad