Patch CFA>

[jburgy]

jonesforth.f relies on the fact that word addresses increase monotonically. Zig and emscripten do not guarantee that invariant. Safer to work around it

This issue shows up, for example, when entering SEE /⏎. The reply should be : / /MOD SWAP DROP ; but ends up being : / LIT LIT LIT ; because the address of LIT is somehow lower than that of DROP.

: ADDR WORD FIND . CR ;
ADDR DROP
69752 
ADDR LIT
68372

[jburgy]

Thank you for approving the initial version, @Afirium . It took reflecting on this question to realize a simpler fix. Please re-approve

[jburgy]

@Afirium I invalidated your approval once again because I realized this invariant warrants a test. Mind clicking the button for a 3rd time?