ted: Yield after printing each row

fox32-arch · May 5, 2024 · a82f002 · a82f002
1 parent ce70bdc
commit a82f002
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git 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
@@ -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;