Miroirs/waforth
1
0
Fork 0
mirror of https://github.com/remko/waforth synced 2024-12-26 09:59:09 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Grow table from within WebAssembly

Browse source
This commit is contained in:
Remko Tronçon 2022-05-22 18:54:59 +02:00
parent fd6a03cc8d
commit 2747458242
2 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/waforth.wat
View file

@ -2201,9 +2201,12 @@
(global.set $cp (i32.add (global.get $cp) (local.get $nameLength)))))
;; Load the code
(call $shell_load (i32.const 0x1000 (; = MODULE_HEADER_BASE ;))
(i32.sub (global.get $cp) (i32.const 0x1000 (; = MODULE_HEADER_BASE ;)))
(global.get $nextTableIndex))
(if (i32.ge_u (global.get $nextTableIndex) (table.size 0))
(then (drop (table.grow 0 (ref.func $!) (table.size 0))))) ;; Double size
(call $shell_load
(i32.const 0x1000 (; = MODULE_HEADER_BASE ;))
(i32.sub (global.get $cp) (i32.const 0x1000 (; = MODULE_HEADER_BASE ;)))
(global.get $nextTableIndex))
(global.set $nextTableIndex (i32.add (global.get $nextTableIndex) (i32.const 1))))

3
src/web/waforth.ts
View file

@ -147,9 +147,6 @@ class WAForth {
}
data = new Uint8Array(dataCopy);
}
if (index >= table.length) {
table.grow(table.length); // Double size
}
// console.log("Load", index, arrayToBase64(data));
try {
var module = new WebAssembly.Module(data);