6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-01-23 14:30:48 +00:00
Code Issues Projects Releases Wiki Activity

Fix running editor from inside forth

Browse Source
This commit is contained in:
David Schmenk 2023-12-29 20:44:25 -08:00
parent 965ccecf2a
commit b2ddb0434d
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/samplesrc/cmdsys.4th
View File

@ -1,6 +1,12 @@
: IFACE 2 * + @ ; : IFACE 2 * + @ ;
LOOKUP CMDSYS 3 IFACE PLASMA EXECMOD LOOKUP CMDSYS 3 IFACE PLASMA EXECMOD
LOOKUP CMDSYS 3 IFACE PLASMA CMDLINE LOOKUP CMDSYS 2 IFACE CONSTANT CMDLINE
LOOKUP STRCPY PLASMA STRCPY LOOKUP STRCPY PLASMA STRCPY
LOOKUP STRCAT PLASMA STRCAT LOOKUP STRCAT PLASMA STRCAT
: EDIT"
CMDLINE " ED " STRCPY
CMDLINE 34 WORD STRCAT
" ED" EXECMOD
;