NUM
#define isnum(n) ((n)->tval & NUM)
buf, tostring(buf), atof(buf), CON|NUM, symtab);
buf, "", 0.0, STR|NUM, symtab);
yylval.cp = setsymtab("NF", "", 0.0, NUM, symtab);
yylval.cp = setsymtab(w, "", 0.0, STR|NUM|DONTFREE, symtab);
recloc->tval |= NUM;
q->tval |= NUM;
p->tval |= NUM;
} else if ((y->tval & (STR|NUM)) == (STR|NUM)) {
x->tval |= NUM;
STR|NUM, (Array *)ap->sval);
STR|NUM, (Array *)ap->sval);
STR|NUM, (Array *)ap->sval);
STR|NUM, (Array *)ap->sval);
STR|NUM, (Array *)ap->sval);
x->tval = NUM;
arrayp->tval &= ~(STR|NUM|DONTFREE);
x->tval = NUM;
{ OCELL, CCOPY, 0, "", 0.0, NUM|STR|DONTFREE, NULL };
oargs[i]->tval &= ~(STR|NUM|DONTFREE);
if ((y->tval & (STR|NUM)) == (STR|NUM)) {
fp->retval->tval |= NUM;
else if (y->tval & NUM)
recloc->tval |= NUM;
x->tval &= ~(STR|NUM|DONTFREE);
z = setsymtab(buf, "", 0.0, STR|NUM, (Array *)x->sval);
x->tval &= ~(STR|NUM|DONTFREE);
ap->tval &= ~(STR|NUM|DONTFREE);
x->tval = NUM;
if (x->tval&NUM && y->tval&NUM) {
static Cell truecell = { OBOOL, BTRUE, NULL, NULL, 1.0, NUM, NULL };
static Cell falsecell = { OBOOL, BFALSE, NULL, NULL, 0.0, NUM, NULL };
static Cell breakcell = { OJUMP, JBREAK, NULL, NULL, 0.0, NUM, NULL };
static Cell contcell = { OJUMP, JCONT, NULL, NULL, 0.0, NUM, NULL };
static Cell nextcell = { OJUMP, JNEXT, NULL, NULL, 0.0, NUM, NULL };
NUM, NULL };
static Cell exitcell = { OJUMP, JEXIT, NULL, NULL, 0.0, NUM, NULL };
static Cell retcell = { OJUMP, JRET, NULL, NULL, 0.0, NUM, NULL };
NUM|STR|DONTFREE, NULL };
literal0 = setsymtab("0", "0", 0.0, NUM|STR|CON|DONTFREE, symtab);
NUM|STR|CON|DONTFREE, symtab);
nfloc = setsymtab("NF", "", 0.0, NUM, symtab);
nrloc = setsymtab("NR", "", 0.0, NUM, symtab);
fnrloc = setsymtab("FNR", "", 0.0, NUM, symtab);
rstartloc = setsymtab("RSTART", "", 0.0, NUM, symtab);
rlengthloc = setsymtab("RLENGTH", "", 0.0, NUM, symtab);
ARGC = &setsymtab("ARGC", "", (Awkfloat)ac, NUM, symtab)->fval;
STR|NUM, ARGVtab);
STR|NUM, ENVtab);
if ((vp->tval & (NUM | STR)) == 0)
vp->tval |= NUM; /* mark number ok */
if ((vp->tval & (NUM | STR)) == 0)
vp->tval &= ~(NUM|CONVC|CONVO);
if ((vp->tval & (NUM | STR)) == 0)
vp->tval |= NUM; /* make NUM only sparingly */
if ((vp->tval & (NUM | STR)) == 0)
#define FOR_EACH_MEMBER(BMP, NUM, UID, STMT) \
while (i1624 < (NUM)) {\
#define FOR_EACH_OBJS(IDS, NUM, UID, STMT) \
while (i1609 < (NUM)) {\
return (NUM);
plural_message : MSGSTR '[' NUM ']' message_string
%token <num> NUM
recloc->tval &= ~NUM;
nrloc->tval |= NUM;
fldtab[i].tval |= NUM;
y = setsymtab(s, tostring(L_NULL), 0.0, STR|NUM, x->sval);
if (x->tval&NUM && y->tval&NUM) {
static CELL truecell ={ OBOOL, BTRUE, 0, 0, 0.0, NUM, 0 };
static CELL falsecell ={ OBOOL, BFALSE, 0, 0, 0.0, NUM, 0 };
static CELL breakcell ={ OJUMP, JBREAK, 0, 0, 0.0, NUM, 0 };
static CELL contcell ={ OJUMP, JCONT, 0, 0, 0.0, NUM, 0 };
if ((y->tval & (STR|NUM)) == (STR|NUM)) {
x->tval |= NUM;
static CELL nextcell ={ OJUMP, JNEXT, 0, 0, 0.0, NUM, 0 };
else if (y->tval & NUM)
static CELL exitcell ={ OJUMP, JEXIT, 0, 0, 0.0, NUM, 0 };
static CELL tempcell ={ OCELL, CTEMP, 0, 0, 0.0, NUM, 0 };
watof(t), STR|NUM, ap->sval);
watof(t), STR|NUM, ap->sval);
x->tval = NUM;
if ((vp->tval & (NUM | STR)) == 0)
vp->tval |= NUM; /* mark number ok */
if ((vp->tval & (NUM | STR)) == 0)
vp->tval &= ~NUM;
if ((vp->tval & (NUM | STR)) == 0)
if ((vp->tval & NUM) == 0) {
vp->tval |= NUM;
if ((vp->tval & (NUM | STR)) == 0)
setsymtab(L_0, tostring(L_0), 0.0, NUM|STR|CON|FLD, symtab);
setsymtab(L_zeronull, tostring(L_NULL), 0.0, NUM|STR|CON|FLD, symtab);
nfloc = setsymtab(L_NF, NULL, 0.0, NUM, symtab);
nrloc = setsymtab(L_NR, NULL, 0.0, NUM, symtab);
if (strcheck(wptr, NUM) != 0) {
if (strcheck(wptr, NUM) != 0) {
if (flag == NUM) {
if (strcheck(optarg, NUM) != 0) {
if (strcheck(optarg, NUM) != 0) {
#define ALLOC(NUM,TYPE) \
(((NUM) <= (((size_t)0-1)/ sizeof(TYPE))) \
? (TYPE *) calloc((NUM), sizeof(TYPE)) \
return (P - orig_p > 2) ? LONGNUM : NUM;