From 9926c9a99da3d862b95da39669f767e4f020ec72 Mon Sep 17 00:00:00 2001
From: Siraaj Khandkar <siraaj@khandkar.net>
Date: Thu, 12 Nov 2020 07:47:50 -0500
Subject: [PATCH] Simplify

---
 tt | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/tt b/tt
index 45f4d56..2bbe402 100755
--- a/tt
+++ b/tt
@@ -73,12 +73,9 @@
                             [(cons x xs) (begin
                                            (thread-send thd (cons 'unit x))
                                            (dispatch ws xs ys))])])))
-  (define workers
-    (range 1 (add1 num_workers)))
-  (define threads
-    (map (λ (id) (thread (make-worker id f))) workers))
-  (define results
-    (dispatch workers xs '()))
+  (define workers (range num_workers))
+  (define threads (map (λ (id) (thread (make-worker id f))) workers))
+  (define results (dispatch workers xs '()))
   (for-each thread-wait threads)
   results)
 
@@ -203,7 +200,7 @@
   (define user-agent
     (let*
       ([prog-name      "tt"]
-       [prog-version   "0.3.2"]
+       [prog-version   "0.3.3"]
        [prog-uri       "https://github.com/xandkar/tt"]
        [user-feed-file (expand-user-path "~/twtxt-me.txt")]
        [user
-- 
2.20.1