From 2cf62a0b248249a529a70e29455a448ebb81e28a Mon Sep 17 00:00:00 2001
From: Omar Rizwan <omar@omar.website>
Date: Mon, 23 Oct 2023 18:43:31 -0400
Subject: text: Simplify loop

---
 virtual-programs/display/text.folk | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'virtual-programs/display')

diff --git a/virtual-programs/display/text.folk b/virtual-programs/display/text.folk
index 95901380..9189e4c1 100644
--- a/virtual-programs/display/text.folk
+++ b/virtual-programs/display/text.folk
@@ -146,8 +146,7 @@ On process "display" {
 
         set lineNum 0
         set instances [list]
-        for {set i 0} {$i < [string length $text]} {incr i} {
-            set char [string index $text $i]
+        foreach char [split $text ""] {
             if {$char eq "\n"} {
                 incr lineNum
                 lassign [vec2 add [list $x0 $y0] \
-- 
cgit v1.2.3