alx/ueforth
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

More web stuff.

Browse Source
This commit is contained in:
Brad Nelson
2021-01-02 00:55:08 -08:00
parent 61ab86cd62
commit a9ec95c110
2 changed files with 22 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
ueforth/web/dump_web_opcodes.c
View File

@ -4,7 +4,7 @@
#include "common/opcodes.h"
#define PLATFORM_OPCODE_LIST \
X("CALL", OP_CALL, sp = jscall(sp, tos); DROP) \
X("CALL", OP_CALL, sp = Call(sp, tos); DROP) \
enum {
OP_NONE = -1,

27
ueforth/web/web.template.js
View File

@ -10,6 +10,26 @@ const boot = `
{{boot}}
`;
var buffer = new ArrayBuffer(HEAP_SIZE);
var i32 = new Int32Array(buffer);
var u8 = new Uint8Array(buffer);
var objects = [SetEval];
function SetEval(sp) {
var index = i32[sp--];
var len = i32[sp--];
var code_addr = i32[sp--];
var code = '';
for (var i = 0; i < len; ++i) {
code += String.fromCharCode(u8[name_addr + i]);
}
objects[index] = eval(code);
}
function Call(sp, tos) {
return objects[tos](sp);
}
function create(name, opcode) {
}
@ -22,12 +42,7 @@ function Interpreter(stdlib, foreign, heap) {
var imul = stdlib.Math.imul;
var exit = foreign.exit;
var emit = foreign.emit;
var qkey = foreign.qkey;
var color = foreign.color;
var print_decimal = foreign.print_decimal;
var print_hexadecimal = foreign.print_hexadecimal;
var Call = foreign.Call;
var u8 = new stdlib.Uint8Array(heap);
var i32 = new stdlib.Int32Array(heap);