Add PUSH-FUNCS and POP-FUNCS.

This commit is contained in:
Dianne Skoll
2025-07-24 14:31:12 -04:00
parent d944ceb32d
commit 9bd0055d4d
12 changed files with 408 additions and 32 deletions
+6 -4
View File
@@ -232,10 +232,11 @@ enum TokTypes
T_Frename, T_Fset, T_Funset, T_If, T_IfTrig, T_In, T_Include,
T_IncludeCmd, T_IncludeR, T_IncludeSys, T_Info, T_LastBack,
T_LongTime, T_MaybeUncomputable, T_Month, T_NoQueue, T_Number,
T_Omit, T_OmitFunc, T_Once, T_Ordinal, T_Pop, T_PopVars,
T_Preserve, T_Priority, T_Push, T_PushVars, T_Rem, T_RemType,
T_Rep, T_Scanfrom, T_Sched, T_Set, T_Skip, T_Tag, T_Through, T_Time,
T_Translate, T_UnSet, T_Until, T_Warn, T_WkDay, T_Year
T_Omit, T_OmitFunc, T_Once, T_Ordinal, T_Pop, T_PopFuncs, T_PopVars,
T_Preserve, T_Priority, T_Push, T_PushFuncs, T_PushVars, T_Rem,
T_RemType, T_Rep, T_Scanfrom, T_Sched, T_Set, T_Skip, T_Tag,
T_Through, T_Time, T_Translate, T_UnSet, T_Until, T_Warn, T_WkDay,
T_Year
};
/* The structure of a token */
@@ -311,6 +312,7 @@ typedef struct udf_struct {
int lineno;
int lineno_start;
int recurse_flag;
int been_pushed;
} UserFunc;
/* A pushed systtem variable */