diff options
Diffstat (limited to 'stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux')
-rw-r--r-- | stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux | 4 |
1 files changed, 2 insertions, 2 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 5d8782a4f..842c23950 100644 --- a/stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux +++ b/stdlib/source/test/lux/tool/compiler/phase/analysis/reference.lux @@ -46,7 +46,7 @@ (-> Text [Bit Text] [Bit Text] Check Bit) (|> (do ///.monad [_ (//module.with-module 0 def-module - (//module.define var-name [export? Any (' {}) []]))] + (//module.define var-name (#.Right [export? Any (' {}) []])))] (//module.with-module 0 dependent-module (do @ [_ (if import? @@ -82,7 +82,7 @@ (_.test "Can analyse definition (in the same module)." (let [def-name [def-module var-name]] (|> (do ///.monad - [_ (//module.define var-name [false expectedT (' {}) []])] + [_ (//module.define var-name (#.Right [false expectedT (' {}) []]))] (//type.with-inference (_primitive.phase (code.identifier def-name)))) (//module.with-module 0 def-module) |