Lines Matching refs:NUM
73 static Cell truecell ={ OBOOL, BTRUE, 0, 0, 1.0, NUM };
75 static Cell falsecell ={ OBOOL, BFALSE, 0, 0, 0.0, NUM };
77 static Cell breakcell ={ OJUMP, JBREAK, 0, 0, 0.0, NUM };
79 static Cell contcell ={ OJUMP, JCONT, 0, 0, 0.0, NUM };
81 static Cell nextcell ={ OJUMP, JNEXT, 0, 0, 0.0, NUM };
83 static Cell nextfilecell ={ OJUMP, JNEXTFILE, 0, 0, 0.0, NUM };
85 static Cell exitcell ={ OJUMP, JEXIT, 0, 0, 0.0, NUM };
87 static Cell retcell ={ OJUMP, JRET, 0, 0, 0.0, NUM };
89 static Cell tempcell ={ OCELL, CTEMP, 0, "", 0.0, NUM|STR|DONTFREE };
223 static Cell newcopycell = { OCELL, CCOPY, 0, "", 0.0, NUM|STR|DONTFREE };
295 oargs[i]->tval &= ~(STR|NUM|DONTFREE);
362 if ((y->tval & (STR|NUM)) == (STR|NUM)) {
365 fp->retval->tval |= NUM;
369 else if (y->tval & NUM)
426 fldtab[0]->tval |= NUM;
479 x->tval &= ~(STR|NUM|DONTFREE);
483 z = setsymtab(buf, "", 0.0, STR|NUM, (Array *) x->sval);
543 ap->tval &= ~(STR|NUM|DONTFREE);
602 x->tval = NUM;
652 if (x->tval&NUM && y->tval&NUM) {
1092 else if ((y->tval & (STR|NUM)) == (STR|NUM)) {
1095 x->tval |= NUM;
1214 char *t, temp, num[50], *fs = 0;
1250 sprintf(num, "%d", n);
1254 setsymtab(num, s, atof(s), STR|NUM, (Array *) ap->sval);
1256 setsymtab(num, s, 0.0, STR, (Array *) ap->sval);
1261 sprintf(num, "%d", n);
1262 setsymtab(num, "", 0.0, STR, (Array *) ap->sval);
1271 sprintf(num, "%d", n);
1273 setsymtab(num, s, atof(s), STR|NUM, (Array *) ap->sval);
1275 setsymtab(num, s, 0.0, STR, (Array *) ap->sval);
1291 sprintf(num, "%d", n);
1293 setsymtab(num, t, atof(t), STR|NUM, (Array *) ap->sval);
1295 setsymtab(num, t, 0.0, STR, (Array *) ap->sval);
1304 sprintf(num, "%d", n);
1308 setsymtab(num, buf, atof(buf), STR|NUM, (Array *) ap->sval);
1310 setsymtab(num, buf, 0.0, STR, (Array *) ap->sval);
1320 sprintf(num, "%d", n);
1322 setsymtab(num, t, atof(t), STR|NUM, (Array *) ap->sval);
1324 setsymtab(num, t, 0.0, STR, (Array *) ap->sval);
1336 x->tval = NUM;
1811 int mflag, tempstat, num;
1817 num = 0;
1836 num++;
1860 num++;
1899 x->tval = NUM;
1900 x->fval = num;
