diff options
Diffstat (limited to 'stdlib/source/lux/platform/compiler/phase/analysis/primitive.lux')
| -rw-r--r-- | stdlib/source/lux/platform/compiler/phase/analysis/primitive.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/platform/compiler/phase/analysis/primitive.lux b/stdlib/source/lux/platform/compiler/phase/analysis/primitive.lux index bd42825d3..b46983293 100644 --- a/stdlib/source/lux/platform/compiler/phase/analysis/primitive.lux +++ b/stdlib/source/lux/platform/compiler/phase/analysis/primitive.lux @@ -10,7 +10,7 @@ (do-template [<name> <type> <tag>] [(def: #export (<name> value) (-> <type> (Operation Analysis)) - (do ///.Monad<Operation> + (do ///.monad [_ (typeA.infer <type>)] (wrap (#//.Primitive (<tag> value)))))] @@ -24,6 +24,6 @@ (def: #export unit (Operation Analysis) - (do ///.Monad<Operation> + (do ///.monad [_ (typeA.infer Any)] (wrap (#//.Primitive #//.Unit)))) |