From dcadd54d64d13dba04784df68570475e389187b7 Mon Sep 17 00:00:00 2001
From: glenda <glenda@cirno>
Date: Fri, 9 Sep 2022 21:28:52 +0000
Subject: Add thread names

---
 apl9.h | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'apl9.h')

diff --git a/apl9.h b/apl9.h
index 01738e6..ce30be9 100644
--- a/apl9.h
+++ b/apl9.h
@@ -243,6 +243,7 @@ struct ThreadData
 	ErrorGuard *globalerrorguard;
 	QLock lock;
 	Rendez newmail;
+	Array *name;
 };
 
 struct Mail
@@ -339,7 +340,7 @@ Function inverse(Function);
 
 /* concurrency.c */
 void initthreads(void);
-int spawnthread(Function, Array *, Array *);
+int spawnthread(Function, Array *, Array *, Array *);
 ThreadData *getthreaddata(void);
 void messagesend(Array *, int);
 Array *messagerecv(Function, int);
@@ -438,7 +439,6 @@ Array *fnSend(Array *, Array *);
 Array *opEach(Datum *, Array *, Array *);
 Array *opSwitch(Datum *, Array *, Array *);
 Array *opKey(Datum *, Array *, Array *);
-Array *opSpawn(Datum *, Array *, Array *);
 Array *opOuterProduct(Datum *, Array *, Array *);
 Array *opSelfReference1(Datum *, Array *, Array *);
 Array *opReceive(Datum *, Array *, Array *);
@@ -452,6 +452,7 @@ Array *opOver(Datum *, Datum *, Array *, Array *);
 Array *opUnder(Datum *, Datum *, Array *, Array *);
 Array *opObverse(Datum *, Datum *, Array *, Array *);
 Array *opSelfReference2(Datum *, Datum *, Array *, Array *);
+Array *opSpawn(Datum *, Datum *, Array *, Array *);
 
 /* Dyadic functions from hybrids.c */
 Array *fnReplicateLast(Array *, Array *);
-- 
cgit v1.2.3