long.js
long.js copied to clipboard
dcodeIO
For packaging for debian => need source information
How did you build the wasm included in the js file ?
Where does come from test/goog ?
Thanks
Moreover I can not compile the wasm: wasm.wat:10:6: error: unexpected token "get_global", expected an instr. (get_global $high) ^^^^^^^^^^ wasm.wat:14:6: error: unexpected token "set_local", expected an instr. (set_local $result ^^^^^^^^^ wasm.wat:17:12: error: unexpected token i64.extend_u/i32. (i64.extend_u/i32 ^^^^^^^^^^^^^^^^ wasm.wat:18:14: error: unexpected token get_local. (get_local $xl) ^^^^^^^^^
It block https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=1063508
The .wasm was built from the .wat file using WABT, at a time when local_get / global_get were still named get_local / get_global. Some basic instruction names changed since, but it should trivially build when updated.
The test/goog files come from Google's closure library.
@dcodeIO If you could give me the exact command or step used for recompiling it will be really helful. I fail
commit 121318aa4e9e8fe7f5c4bf82271abfa4d0f9f9b7
Author: Bastien Roucariès <[email protected]>
Date: Fri Feb 16 20:15:57 2024 +0000
Convert to modern wasm
forwarded: https://github.com/dcodeIO/long.js/issues/129
diff --git a/wasm.wat b/wasm.wat
index 983fcdf..d1bfeb4 100644
--- a/wasm.wat
+++ b/wasm.wat
@@ -7,206 +7,206 @@
(export "get_high" (func $get_high))
(global $high (mut i32) (i32.const 0))
(func $get_high (result i32)
- (get_global $high)
+ (global.get $high)
)
(func $mul (param $xl i32) (param $xh i32) (param $yl i32) (param $yh i32) (result i32)
(local $result i64)
- (set_local $result
+ (local.set $result
(i64.mul
(i64.or
- (i64.extend_u/i32
- (get_local $xl)
+ (i64.extend_i32_u
+ (local.get $xl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $xh)
+ (i64.extend_i32_u
+ (local.get $xh)
)
(i64.const 32)
)
)
(i64.or
- (i64.extend_u/i32
- (get_local $yl)
+ (i64.extend_i32_u
+ (local.get $yl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $yh)
+ (i64.extend_i32_u
+ (local.get $yh)
)
(i64.const 32)
)
)
)
)
- (set_global $high
- (i32.wrap/i64
+ (global.set $high
+ (i32.wrap_i64
(i64.shr_s
- (get_local $result)
+ (local.get $result)
(i64.const 32)
)
)
)
- (i32.wrap/i64
- (get_local $result)
+ (i32.wrap_i64
+ (local.get $result)
)
)
(func $div_s (param $xl i32) (param $xh i32) (param $yl i32) (param $yh i32) (result i32)
(local $result i64)
- (set_local $result
+ (local.set $result
(i64.div_s
(i64.or
- (i64.extend_u/i32
- (get_local $xl)
+ (i64.extend_i32_u
+ (local.get $xl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $xh)
+ (i64.extend_i32_u
+ (local.get $xh)
)
(i64.const 32)
)
)
(i64.or
- (i64.extend_u/i32
- (get_local $yl)
+ (i64.extend_i32_u
+ (local.get $yl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $yh)
+ (i64.extend_i32_u
+ (local.get $yh)
)
(i64.const 32)
)
)
)
)
- (set_global $high
- (i32.wrap/i64
+ (global.set $high
+ (i32.wrap_i64
(i64.shr_s
- (get_local $result)
+ (local.get $result)
(i64.const 32)
)
)
)
- (i32.wrap/i64
- (get_local $result)
+ (i32.wrap_i64
+ (local.get $result)
)
)
(func $div_u (param $xl i32) (param $xh i32) (param $yl i32) (param $yh i32) (result i32)
(local $result i64)
- (set_local $result
+ (local.set $result
(i64.div_u
(i64.or
- (i64.extend_u/i32
- (get_local $xl)
+ (i64.extend_i32_u
+ (local.get $xl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $xh)
+ (i64.extend_i32_u
+ (local.get $xh)
)
(i64.const 32)
)
)
(i64.or
- (i64.extend_u/i32
- (get_local $yl)
+ (i64.extend_i32_u
+ (local.get $yl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $yh)
+ (i64.extend_i32_u
+ (local.get $yh)
)
(i64.const 32)
)
)
)
)
- (set_global $high
- (i32.wrap/i64
+ (global.set $high
+ (i32.wrap_i64
(i64.shr_s
- (get_local $result)
+ (local.get $result)
(i64.const 32)
)
)
)
- (i32.wrap/i64
- (get_local $result)
+ (i32.wrap_i64
+ (local.get $result)
)
)
(func $rem_s (param $xl i32) (param $xh i32) (param $yl i32) (param $yh i32) (result i32)
(local $result i64)
- (set_local $result
+ (local.set $result
(i64.rem_s
(i64.or
- (i64.extend_u/i32
- (get_local $xl)
+ (i64.extend_i32_u
+ (local.get $xl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $xh)
+ (i64.extend_i32_u
+ (local.get $xh)
)
(i64.const 32)
)
)
(i64.or
- (i64.extend_u/i32
- (get_local $yl)
+ (i64.extend_i32_u
+ (local.get $yl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $yh)
+ (i64.extend_i32_u
+ (local.get $yh)
)
(i64.const 32)
)
)
)
)
- (set_global $high
- (i32.wrap/i64
+ (global.set $high
+ (i32.wrap_i64
(i64.shr_s
- (get_local $result)
+ (local.get $result)
(i64.const 32)
)
)
)
- (i32.wrap/i64
- (get_local $result)
+ (i32.wrap_i64
+ (local.get $result)
)
)
(func $rem_u (param $xl i32) (param $xh i32) (param $yl i32) (param $yh i32) (result i32)
(local $result i64)
- (set_local $result
+ (local.set $result
(i64.rem_u
(i64.or
- (i64.extend_u/i32
- (get_local $xl)
+ (i64.extend_i32_u
+ (local.get $xl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $xh)
+ (i64.extend_i32_u
+ (local.get $xh)
)
(i64.const 32)
)
)
(i64.or
- (i64.extend_u/i32
- (get_local $yl)
+ (i64.extend_i32_u
+ (local.get $yl)
)
(i64.shl
- (i64.extend_u/i32
- (get_local $yh)
+ (i64.extend_i32_u
+ (local.get $yh)
)
(i64.const 32)
)
)
)
)
- (set_global $high
- (i32.wrap/i64
+ (global.set $high
+ (i32.wrap_i64
(i64.shr_s
- (get_local $result)
+ (local.get $result)
(i64.const 32)
)
)
)
- (i32.wrap/i64
- (get_local $result)
+ (i32.wrap_i64
+ (local.get $result)
)
)
)