From e2ebfbb7d19ff3b990eb51dc9843200053cbbf98 Mon Sep 17 00:00:00 2001 From: glenda Date: Sat, 10 Sep 2022 16:25:05 +0000 Subject: Improve the session a lot --- apl9.h | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'apl9.h') diff --git a/apl9.h b/apl9.h index cc4051c..1f9c8a7 100644 --- a/apl9.h +++ b/apl9.h @@ -329,13 +329,14 @@ Array *runtrain(Function *, int, Array *, Array *, Array *); /* quadnames.c */ void initquadnames(void); Datum *quadnamedatum(QuadnameDef); -void setquotequad(Datum *); +void setquad(Datum *); Array *runfile(Array *); /* error.c */ ErrorGuard *newerrorguard(Array *, Statement *); void throwerror(Rune *, int); Rune *errorstr(int); +void displayerror(void); /* inverse.c */ Function inverse(Function); @@ -413,6 +414,7 @@ Array *fnLess(Array *, Array *); Array *fnGreater(Array *, Array *); Array *fnGreaterEqual(Array *, Array *); Array *fnMatch(Array *, Array *); +Array *fnNotMatch(Array *, Array *); Array *fnOr(Array *, Array *); Array *fnAnd(Array *, Array *); Array *fnNand(Array *, Array *); @@ -487,5 +489,4 @@ extern int arrayalloccounts; /* memory.c */ extern int datumalloccounts; /* memory.c */ extern QuadnameDef quadnames[]; /* quadnames.c */ extern int printprecision; /* print.c */ -extern int needsnewline; /* quadnames.c */ extern int mainstacksize; /* concurrency.c */ \ No newline at end of file -- cgit v1.2.3