summaryrefslogtreecommitdiff
path: root/apl9.h
diff options
context:
space:
mode:
Diffstat (limited to 'apl9.h')
-rw-r--r--apl9.h8
1 files changed, 6 insertions, 2 deletions
diff --git a/apl9.h b/apl9.h
index 24ddc01..d86d659 100644
--- a/apl9.h
+++ b/apl9.h
@@ -12,8 +12,6 @@ typedef enum
BoundFunctionTag, /* Function with left arg bound */
LParTag,
RParTag,
- LBracketTag,
- RBracketTag,
ArrowTag,
AssignmentTag,
NameTag,
@@ -70,6 +68,7 @@ struct Statement
{
int ntoks;
Datum *toks;
+ Statement *guard;
Statement *next;
};
@@ -170,6 +169,7 @@ int commontype(Array *, Array *, Array **, Array **, int);
Array *arrayitem(Array *, int);
Array *simplifyarray(Array *);
int comparearray(Array *, Array *, int);
+Array *fillelement(Array *);
/* eval.c */
Datum *eval(Statement *);
@@ -189,6 +189,7 @@ void incref(Array *);
/* functions.c */
Array *runfunc(Function, Array *,Array *);
+Array *rundfn(Rune *, Array *, Array *);
/* quadnames.c */
Datum quadnamedatum(QuadnameDef);
@@ -196,6 +197,8 @@ Datum quadnamedatum(QuadnameDef);
/* Monadic functions from function.c */
Array *fnSame(Array *);
Array *fnTally(Array *);
+Array *fnMix(Array *);
+Array *fnSplit(Array *);
Array *fnEnclose(Array *);
Array *fnNest(Array *);
Array *fnGradeUp(Array *);
@@ -218,6 +221,7 @@ Array *fnLogarithm(Array *, Array *);
Array *fnLeft(Array *, Array *);
Array *fnRight(Array *, Array *);
Array *fnMatch(Array *, Array *);
+Array *fnTake(Array *, Array *);
Array *fnIndex(Array *, Array *);
Array *fnCatenateFirst(Array *, Array *);
Array *fnReshape(Array *, Array *);