From 48de43f9ed9622e93a23b3636135e64d47eb7ecf Mon Sep 17 00:00:00 2001
From: Irene Knapp <ireneista@irenes.space>
Date: Mon, 13 Apr 2026 19:31:59 -0700
Subject: implement all the remaining Forth words that need flatassembler
 versions

wow!!!!!

the next step is implementing the Forth lexer. wow!

Force-Push: yes
Change-Id: If847c1d7b3949f7d449279e0783021484f96e6a8
---
 describe-data.sed | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'describe-data.sed')

diff --git a/describe-data.sed b/describe-data.sed
index 712860f..77f3d8e 100644
--- a/describe-data.sed
+++ b/describe-data.sed
@@ -13,7 +13,8 @@ s/\<roll3\>/3roll/g
 s/\<unroll3\>/3unroll/g
 s/\<dup2\>/2dup/g
 s/\<drop2\>/2drop/g
-s/\<zbranch\>/0branch/g
+s/^zbranch\>/0branch/g
+s/\([^"]\)\<zbranch\>/\10branch/g
 s/\<eq\>/=/g
 s/\<ne\>/!=/g
 s/\<gt\>/>/g
@@ -39,6 +40,8 @@ s/\<fetch-value-stack\>/value@/g
 s/\<store-value-stack\>/value!/g
 s/\<fetch-control-stack\>/control@/g
 s/\<store-control-stack\>/control!/g
+s/\<fetch-entry-flags\>/entry-flags@/g
+s/\<store-entry-flags\>/entry-flags!/g
 s/\<fetch\>/@/g
 s/\<store\>/!/g
 
-- 
cgit 1.4.1