From 827b183550dc6d6bf529b92c7bd9897536c7f671 Mon Sep 17 00:00:00 2001
From: Bob Polis <rpb.polis@avans.nl>
Date: Mon, 28 Sep 2020 14:10:17 +0200
Subject: [PATCH] fixed bug where loop index would stay on value stack

---
 tests/find-replace | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/tests/find-replace b/tests/find-replace
index 99e3a4b..d78e8f5 100755
--- a/tests/find-replace
+++ b/tests/find-replace
@@ -5,17 +5,19 @@ gto
 =i
 =term
 =text
+$i
 :loop
+=_
 $text
 $i
-$i
+dup
 $term
 len
 add
 slc
 =part
 $i
-$i
+dup
 inc
 =i
 $i