diff options
Diffstat (limited to 'stdlib/source/lux/target/jvm/instruction.lux')
| -rw-r--r-- | stdlib/source/lux/target/jvm/instruction.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux/target/jvm/instruction.lux b/stdlib/source/lux/target/jvm/instruction.lux index ac4732e12..02057202b 100644 --- a/stdlib/source/lux/target/jvm/instruction.lux +++ b/stdlib/source/lux/target/jvm/instruction.lux @@ -13,7 +13,7 @@ [text ["%" format (#+ format)]] [number - ["." nat] + ["n" nat] ["i" int]] [collection ["." list ("#@." functor fold)] @@ -47,7 +47,7 @@ Tracker {#program-counter 0 #next-label 0 - #known-labels (dictionary.new nat.hash)}) + #known-labels (dictionary.new n.hash)}) (type: #export Partial (-> Resolver (Try Bytecode))) @@ -365,8 +365,8 @@ (def: (jump @from @to) (-> Address Address (Either Jump Big-Jump)) - (let [jump (.int (n/- @to @from)) - big? (n/> (//unsigned.nat //unsigned.max-u2) + (let [jump (.int (n.- @to @from)) + big? (n.> (//unsigned.nat //unsigned.max-u2) (.nat (i.* (if (i.>= +0 jump) +1 -1) |