From a82f0023cbcaf4444ad6d76b8c70b1b24a3e14e2 Mon Sep 17 00:00:00 2001
From: Ry <ryanst755@gmail.com>
Date: Sun, 5 May 2024 02:23:35 -0700
Subject: [PATCH] ted: Yield after printing each row

---
 applications/ted/OS.okm  | 2 +-
 applications/ted/TEd.okm | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/applications/ted/OS.okm b/applications/ted/OS.okm
index 0341500..a463d32 100644
--- a/applications/ted/OS.okm
+++ b/applications/ted/OS.okm
@@ -10,7 +10,7 @@ MODULE OS;
           REDRAW           = 0FFH;
 
     EXTERN PROCEDURE end_current_task, open, create, read, write, get_size, get_current_disk_id,
-        allocate_memory, free_memory, string_length, copy_memory_bytes, copy_string: INT;
+        allocate_memory, free_memory, string_length, copy_memory_bytes, copy_string, save_state_and_yield_task: INT;
 
     EXTERN PROCEDURE brk: INT;
 
diff --git a/applications/ted/TEd.okm b/applications/ted/TEd.okm
index d7ba59c..36d5a27 100644
--- a/applications/ted/TEd.okm
+++ b/applications/ted/TEd.okm
@@ -179,7 +179,6 @@ MODULE TEd;
         rowAt: POINTER TO Row;
         fileRow: INT;
     BEGIN
-        (* draw tildes *)
         y := 0;
         WHILE y <| 24 DO
             fileRow := y + rowOffset;
@@ -214,7 +213,7 @@ MODULE TEd;
             END;
 
             PrintChar(10);
-
+            save_state_and_yield_task();
             y := y + 1;
         END;
     END;