From 1c2e2b58bca4e837bed6d701fe16be092be828a3 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 24 May 2019 21:22:48 -0400
Subject: Removed the (magical) "export?" annotations tag.

---
 stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux | 8 ++------
 1 file changed, 2 insertions(+), 6 deletions(-)

(limited to 'stdlib/source/test')

diff --git a/stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux b/stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux
index 7356b9fad..5d8782a4f 100644
--- a/stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux
+++ b/stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux
@@ -46,11 +46,7 @@
   (-> Text [Bit Text] [Bit Text] Check Bit)
   (|> (do ///.monad
         [_ (//module.with-module 0 def-module
-             (//module.define var-name [Any
-                                        (if export?
-                                          (' {#.export? #1})
-                                          (' {}))
-                                        []]))]
+             (//module.define var-name [export? Any (' {}) []]))]
         (//module.with-module 0 dependent-module
           (do @
             [_ (if import?
@@ -86,7 +82,7 @@
             (_.test "Can analyse definition (in the same module)."
                     (let [def-name [def-module var-name]]
                       (|> (do ///.monad
-                            [_ (//module.define var-name [expectedT (' {}) []])]
+                            [_ (//module.define var-name [false expectedT (' {}) []])]
                             (//type.with-inference
                               (_primitive.phase (code.identifier def-name))))
                           (//module.with-module 0 def-module)
-- 
cgit v1.2.3