aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/target/jvm/bytecode/instruction.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux b/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux
index d4f4ba688..a77eb88a4 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux
@@ -623,7 +623,7 @@
(binary.write/16 (inc offset) 0 binary))
2 (binary.write/16 offset 0 binary)
1 (binary.write/8 offset 0 binary)
- _ (wrap binary))
+ _ (in binary))
#let [offset (n.+ padding offset)]
_ (binary.write/32 offset (///signed.value default) binary)
#let [offset (n.+ (///unsigned.value ..big_jump_size) offset)]
@@ -635,7 +635,7 @@
(#.Cons at_minimum afterwards))]
(case afterwards
#.Nil
- (wrap binary)
+ (in binary)
(#.Cons head tail)
(do !
@@ -685,7 +685,7 @@
(binary.write/16 (inc offset) 0 binary))
2 (binary.write/16 offset 0 binary)
1 (binary.write/8 offset 0 binary)
- _ (wrap binary))
+ _ (in binary))
#let [offset (n.+ padding offset)]
_ (binary.write/32 offset (///signed.value default) binary)
#let [offset (n.+ (///unsigned.value ..big_jump_size) offset)]
@@ -694,7 +694,7 @@
cases cases]
(case cases
#.Nil
- (wrap binary)
+ (in binary)
(#.Cons [value jump] tail)
(do !