diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux | 8 |
1 files changed, 2 insertions, 6 deletions
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) |