From 1635ece1af3e48bdda2f7d04ca783c8684ba5b08 Mon Sep 17 00:00:00 2001
From: nodist <kevin.comas.git@gmail.com>
Date: Mon, 22 Jun 2026 15:59:21 -0400
Subject: async process list of files

---
 letter_table.kpl | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'letter_table.kpl')

diff --git a/letter_table.kpl b/letter_table.kpl
index 29856b0..9eb25a5 100644
--- a/letter_table.kpl
+++ b/letter_table.kpl
@@ -18,9 +18,12 @@
     ? 3 != `length args {
         `return `error String $ (
             "#BOLD#RED#Got: %#\n" `format " " `join args
-            "#BOLD#WHITE#Usage: % % <file>#\n" `format (args `get 0; args `get 1)
+            "#BOLD#WHITE#Usage: % % <file...>#\n" `format (args `get 0; args `get 1)
          )
     }
-    `use "file" [open; read]
-    `log letter_table `sync String $ read `sync open `sync args `get -1
+    read_log : ([filename]
+        `use "io" [open; read]
+        `log letter_table `sync read `sync open `sync filename
+    )
+    @ 2 .. `length args {[arg_index] read_log `async args `get arg_index }
 )
-- 
cgit v1.2.3