diff options
Diffstat (limited to 'interpret.e')
| -rw-r--r-- | interpret.e | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/interpret.e b/interpret.e index 24ea430..c1d88c4 100644 --- a/interpret.e +++ b/interpret.e @@ -544,10 +544,10 @@ latest @ ~ Now we enable the three words we'd been keeping hidden. It would be a ~ good idea to call "quit" as soon as possible after this, but we leave it to ~ the user. -dup entry-flags@ 0x80 invert & entry-flags! -dup entry-flags@ 0x80 invert & entry-flags! -dup entry-flags@ 0x80 invert & entry-flags! -dup entry-flags@ 0x80 invert & entry-flags! +dup entry-flags@ 0x80 invert & swap entry-flags! +dup entry-flags@ 0x80 invert & swap entry-flags! +dup entry-flags@ 0x80 invert & swap entry-flags! +dup entry-flags@ 0x80 invert & swap entry-flags! ~ Though we only do it once, this is a bit involved so we provide it as a ~ word. Notionally there are situations in which it could come up again, so |