summaryrefslogtreecommitdiff
path: root/apl9.h
diff options
context:
space:
mode:
authorglenda <glenda@cirno>2022-09-13 18:30:06 +0000
committerglenda <glenda@cirno>2022-09-13 18:30:06 +0000
commitb7e3d0927fe0821e919ccc4a66ef149bddcc20de (patch)
tree2c6e2e4fa7d31d3443dab3c0799bb6a44f60bcde /apl9.h
parent34adf252d179556df7d8277370e735c56c6ab3f5 (diff)
Switch to rfork instead of libthread
Diffstat (limited to 'apl9.h')
-rw-r--r--apl9.h12
1 files changed, 3 insertions, 9 deletions
diff --git a/apl9.h b/apl9.h
index 6709dcb..8fa539d 100644
--- a/apl9.h
+++ b/apl9.h
@@ -2,9 +2,6 @@
#define MAX_LINE_LENGTH 1024
#define MAX_LINE_TOKENS 1024
-#define STACKSIZE (1024*1024) /* 1 MB */
-#define REQUIREDSTACK (16*1024) /* 16 KB */
-
typedef enum
{
ArrayTag,
@@ -237,7 +234,7 @@ struct DfnFrame
struct ThreadData
{
int id;
- int requiredstack;
+ int stackused;
DfnFrame *currentdfn;
Mail *mail;
Mail *lastmail;
@@ -355,9 +352,7 @@ void messagesend(Array *, int);
Array *messagerecv(Function, int);
Array *runningthreads(void);
Array *threadproperty(vlong, vlong);
-int stackused(void);
-int hasstack(int);
-void checkstack(void);
+void stackusage(void);
/* Monadic functions from function.c */
Array *fnNegate(Array *);
@@ -497,5 +492,4 @@ extern opmonad hybridoperatordefs[]; /* hybrids.c */
extern int arrayalloccounts; /* memory.c */
extern int datumalloccounts; /* memory.c */
extern QuadnameDef quadnames[]; /* quadnames.c */
-extern int printprecision; /* print.c */
-extern int mainstacksize; /* concurrency.c */ \ No newline at end of file
+extern int printprecision; /* print.c */ \ No newline at end of file