|
|
|
@ -18,7 +18,7 @@ Goals |
|
|
|
|
- Compact and embeddable so it can be ported to ARM-CortexM or similar later |
|
|
|
|
- Implement the CORE and CORE-EXT word sets, for a start |
|
|
|
|
- Pass the [Forth2012 test suite](https://github.com/gerryjackson/forth2012-test-suite), at least for the word sets that are implemented |
|
|
|
|
- Maybe eventually have some terminal-based implementation of a subset of the Facility word set, like AT-XY and keyboard input |
|
|
|
|
- Maybe eventually have some terminal-based implementation of (a subset of) the Facility word set, like AT-XY and keyboard input |
|
|
|
|
- Try to keep added custom words and quirks at a minimum |
|
|
|
|
- Comment stuff, maybe |
|
|
|
|
|
|
|
|
@ -64,6 +64,9 @@ FORGET SEE BYE |
|
|
|
|
|
|
|
|
|
Missing: |
|
|
|
|
|
|
|
|
|
basically, CASE-OF, pictured numbers, some specialty math stuff, working with characters and the more |
|
|
|
|
weird metaprogramming things and manipulating the input buffer. |
|
|
|
|
|
|
|
|
|
``` |
|
|
|
|
CORE: |
|
|
|
|
# #> #S <# >BODY >NUMBER ABORT" ACCEPT C! C, C@ DOES> EVALUATE FILL FM/MOD HOLD KEY LSHIFY M* MAX |
|
|
|
@ -71,7 +74,7 @@ MIN MOVE RSHIFT S>D SIGN SM/REM SPACES STATE U. UM* UM/MOD UNLOOP |
|
|
|
|
|
|
|
|
|
CORE-EXT: |
|
|
|
|
.R :NONAME ACTION-OF BUFFER: C" CASE COMPILE, DEFER DEFER! DEFER@ ENDCASE ENDOF ERASE HOLDS IS |
|
|
|
|
MARKER OFPARSE PARSE-NAME REFILL RESTORE-INPUT SAVE-INPUT SOURCE-IDWITHIN [COMPILE] |
|
|
|
|
MARKER OF PARSE PARSE-NAME REFILL RESTORE-INPUT SAVE-INPUT SOURCE-ID WITHIN [COMPILE] |
|
|
|
|
``` |
|
|
|
|
|
|
|
|
|
. |
|
|
|
|