commit 675de2c1122a42c10a4d997d5928d9d3a8fc8bee parent 26e5a5edb6dac458b076c3fb15def59d07600d25 Author: Henry Wilson <m3henry@googlemail.com> Date: Wed, 2 Aug 2017 14:09:05 +0100 immediate flag from coefield Diffstat:
| M | interpreter.s | | | 5 | +++-- |
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/interpreter.s b/interpreter.s @@ -37,9 +37,10 @@ verb forth INTERPRET do comma goto 2f 1: do DUP - const 8 - do minus do fetch + const 0x8000000000000000 + do AND + do iszero get MODE do AND if 1f