version 1.30, 2000/02/02 14:05:22 |
version 1.31, 2000/03/11 15:54:44 |
|
|
#ifdef EXTENDED |
#ifdef EXTENDED |
{ "paste", PASTTYPE }, |
{ "paste", PASTTYPE }, |
{ "spaste", SPASTYPE }, |
{ "spaste", SPASTYPE }, |
|
/* Newer extensions, needed to handle gnu-m4 scripts */ |
|
{ "indir", INDIRTYPE}, |
|
{ "builtin", BUILTINTYPE}, |
|
{ "patsubst", PATSTYPE}, |
|
{ "regexp", REGEXPTYPE}, |
|
{ "__file__", FILENAMETYPE | NOARGS}, |
|
{ "__line__", LINETYPE | NOARGS}, |
#endif |
#endif |
{ "popdef", POPDTYPE }, |
{ "popdef", POPDTYPE }, |
{ "pushdef", PUSDTYPE }, |
{ "pushdef", PUSDTYPE }, |
|
|
p->type |= NEEDARGS; |
p->type |= NEEDARGS; |
} |
} |
} |
} |
|
|
|
/* Look up a builtin type, even if overridden by the user */ |
|
int |
|
builtin_type(key) |
|
const char *key; |
|
{ |
|
int i; |
|
|
|
for (i = 0; i != MAXKEYS; i++) |
|
if (STREQ(keywrds[i].knam, key)) |
|
return keywrds[i].ktyp; |
|
return -1; |
|
} |
|
|
|
|
static void |
static void |
record(t, lev) |
record(t, lev) |