Return to eval.c CVS log | Up to [local] / src / usr.bin / m4 |
version 1.32, 2001/09/18 14:10:55 | version 1.33, 2001/09/18 14:17:38 | ||
---|---|---|---|
|
|
||
dump_one_def(p) | dump_one_def(p) | ||
ndptr p; | ndptr p; | ||
{ | { | ||
fprintf(stderr, "`%s'\t`%s'\n", p->name, p->defn); | char *real; | ||
if (mimic_gnu) { | |||
if ((p->type & TYPEMASK) == MACRTYPE) | |||
fprintf(stderr, "%s:\t%s\n", p->name, p->defn); | |||
else { | |||
real = builtin_realname(p->type); | |||
if (real == NULL) | |||
real = null; | |||
fprintf(stderr, "%s:\t<%s>\n", p->name, real); | |||
} | |||
} else | |||
fprintf(stderr, "`%s'\t`%s'\n", p->name, p->defn); | |||
} | } | ||
/* | /* |