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

Improve web version.

Browse Source
This commit is contained in:
Brad Nelson
2022-06-04 21:34:58 -07:00
parent e6ca85f4f6
commit 4b20986bd8
4 changed files with 19 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
web/fuse_web.js
View File

@ -33,9 +33,9 @@ cases = ReplaceAll(cases, 'DROP', 'tos = *sp--');
cases = ReplaceAll(cases, 'DUP', '*++sp = tos');
cases = ReplaceAll(cases, 'tos += *sp--', 'tos = (tos + *sp)|0; --sp');
cases = ReplaceAll(cases, /tos (.)= /, 'tos = tos $1 ');
cases = ReplaceAll(cases, /[*](.)p[+][+]/, '*$1p; ++$1p');
cases = ReplaceAll(cases, /[*](.)p[-][-]/, '*$1p; --$1p');
cases = ReplaceAll(cases, /[*][+][+](.)p/, '++$1p; *$1p');
cases = ReplaceAll(cases, /[*](.)p[+][+]/, '*$1p, ++$1p');
cases = ReplaceAll(cases, /[*](.)p[-][-]/, '*$1p, --$1p');
cases = ReplaceAll(cases, /[*][+][+](.)p/, '++$1p, *$1p');
cases = ReplaceAll(cases, '*(cell_t *) tos = ', 'i32[tos>>2] = ');
cases = ReplaceAll(cases, '*(int32_t *) tos = ', 'i32[tos>>2] = ');
cases = ReplaceAll(cases, '*(uint8_t *) tos = ', 'u8[tos] = ');