From 6abdd618f54acab8cb2d04f3c3ee2d0aab36eb22 Mon Sep 17 00:00:00 2001
From: Ralph Ronnquist <ralph.ronnquist@gmail.com>
Date: Fri, 11 Jun 2021 20:16:40 +1000
Subject: [PATCH] using IFAGAIN instead

---
 examples/timing.f | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/examples/timing.f b/examples/timing.f
index 61d5c0c..e3b99dd 100755
--- a/examples/timing.f
+++ b/examples/timing.f
@@ -24,8 +24,8 @@ INPUT @ READ-WORD time0 CREATE DROP 0 , ( variable time0 )
 : longloop ( n -- )
   S" Takes " TELL marktime
   0 BEGIN
-    1 + 2DUP <= IFBREAK
-  AGAIN 2DROP
+    1 + 2DUP > IFAGAIN
+  END 2DROP
   telltime S"  seconds" TELL NL EMIT
 ;
 
-- 
2.39.2