| commit | 94f1e76762631172b18f933fda5993b84cdb608b | [log] [tgz] |
|---|---|---|
| author | swissChili <swisschili@fastmail.com> | Sat Jan 29 21:55:45 2022 -0800 |
| committer | swissChili <swisschili@fastmail.com> | Sat Jan 29 21:55:45 2022 -0800 |
| tree | 6798f09c03d83dcb595fa2706ef0a7cbbf941ccc | |
| parent | e4d2e288935e0935ae7cd7b6e7e57e77c474af99 [diff] [blame] |
Add core words
diff --git a/FORTH.ASM b/FORTH.ASM index 8d8dc28..19c184f 100644 --- a/FORTH.ASM +++ b/FORTH.ASM
@@ -186,11 +186,6 @@ RSPOP SI NEXT -TEST_PRINTING: - DW INTRAW - MOV AX, 5723 - JMP DOT_INT - DEFWORD_RAW BYE, 'BYE' FLUSH @@ -241,8 +236,8 @@ DEFWORD_RAW SLASHMOD, '/MOD' - POP DX POP AX + POP DX IDIV DX PUSH DX ; Remainder PUSH AX ; Quotient