From f186ff2a22459ebf2fd83b63b66370d018dcbbef Mon Sep 17 00:00:00 2001
From: Clyne Sullivan <clyne@bitgloo.com>
Date: Sat, 11 Mar 2023 16:11:24 -0500
Subject: find

---
 forth/test/core.fr | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'forth')

diff --git a/forth/test/core.fr b/forth/test/core.fr
index 2d8b8e4..d2724e1 100644
--- a/forth/test/core.fr
+++ b/forth/test/core.fr
@@ -647,8 +647,8 @@ T{ : GT2 ['] GT1 ; IMMEDIATE -> }T
 T{ GT2 EXECUTE -> 123 }T
 HERE 3 C, CHAR G C, CHAR T C, CHAR 1 C, CONSTANT GT1STRING
 HERE 3 C, CHAR G C, CHAR T C, CHAR 2 C, CONSTANT GT2STRING
-\ T{ GT1STRING FIND -> ' GT1 -1 }T
-\ T{ GT2STRING FIND -> ' GT2 1 }T
+T{ GT1STRING FIND -> ' GT1 -1 }T
+T{ GT2STRING FIND -> ' GT2 1 }T
 \ ( HOW TO SEARCH FOR NON-EXISTENT WORD? )
 T{ : GT3 GT2 LITERAL ; -> }T
 T{ GT3 -> ' GT1 }T
-- 
cgit v1.2.3