From 0cf44154047325a85eb1ab67c4d5b14c09dadfe9 Mon Sep 17 00:00:00 2001
From: exegete <nikitf-97@mail.ru>
Date: Fri, 16 Oct 2020 18:21:27 +0300
Subject: else, do until macro

---
 ia32/macro.sts | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

(limited to 'ia32/macro.sts')

diff --git a/ia32/macro.sts b/ia32/macro.sts
index efd062e..3842a5c 100644
--- a/ia32/macro.sts
+++ b/ia32/macro.sts
@@ -48,3 +48,25 @@
 [ fi 0
     ?$ ?swap ?!
 ]
+
+[ else 0
+    branch ?$ # 0 ?.
+    ?swap ?$ ?swap ?!
+]
+
+[ do 0
+    ?$
+]
+
+[ untilod 0
+    0branch ?.
+]
+
+[ until 0
+    0 = 0branch ?$ # 0 ?.
+]
+
+[ od 0
+    branch ?swap ?.
+    ?$ ?swap ?!
+]
-- 
cgit v1.2.3