From a00f83c9446159eaf9ac817dfae5291cb226ab7a Mon Sep 17 00:00:00 2001 From: Irene Knapp Date: Thu, 28 May 2026 21:34:03 -0700 Subject: swap the parameters to "entry-flags!" Force-Push: yes Change-Id: I11f3eb1079d27a7306d6ed1e8e4b9fd6fb7d3a4a --- interpret.e | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'interpret.e') 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 -- cgit 1.4.1