Cross Reference: /osnet-11/usr/src/lib/efcode/engine/forth.c

Lines Matching refs:TOS
61 	TOS += d;
71 	TOS -= d;
81 	TOS *= d;
164 	TOS &= d;
174 	TOS |= d;
184 	TOS ^= d;
191 	TOS = ~TOS;
201 	TOS = TOS << d;
211 	TOS = ((ufstack_t)TOS) >> d;
221 	TOS = ((s_lforth_t)TOS) >> d;
228 	TOS = -TOS;
235 	if (TOS < 0) TOS = -TOS;
245 	if (d < TOS)	TOS = d;
255 	if (d > TOS)	TOS = d;
286 #define	COMPARE(cmp, rhs)	((((s_lforth_t)TOS) cmp((s_lforth_t)(rhs))) ? \
288 #define	UCOMPARE(cmp, rhs) 	((((u_lforth_t)TOS) cmp((u_lforth_t)(rhs))) ? \
301 	TOS = COMPARE(EQUALS, 0);
308 	TOS = COMPARE(NOTEQUALS, 0);
315 	TOS = COMPARE(LESSTHAN, 0);
322 	TOS = COMPARE(LESSEQUALS, 0);
329 	TOS = COMPARE(GREATERTHAN, 0);
336 	TOS = COMPARE(GREATEREQUALS, 0);
346 	TOS = COMPARE(LESSTHAN, d);
356 	TOS = COMPARE(GREATERTHAN, d);
366 	TOS = COMPARE(EQUALS, d);
376 	TOS = COMPARE(NOTEQUALS, d);
387 	TOS = UCOMPARE(GREATERTHAN, d);
397 	TOS = UCOMPARE(LESSEQUALS, d);
407 	TOS = UCOMPARE(LESSTHAN, d);
417 	TOS = UCOMPARE(GREATEREQUALS, d);
427 	TOS = COMPARE(GREATEREQUALS, d);
437 	TOS = COMPARE(LESSEQUALS, d);
448 	TOS = (((u_lforth_t)TOS >= lo) && ((u_lforth_t)TOS <= hi) ? -1 : 0);
459 	TOS = ((((u_lforth_t)TOS >= lo) && ((u_lforth_t)TOS < hi)) ? -1 : 0);
666 	TOS = toupper(TOS);
673 	TOS = tolower(TOS);
686 	str = (char *)TOS;
687 	TOS = (fstack_t)buf;
698 	len = (uchar_t *)TOS;
699 	TOS += 1;
707 	TOS = (fstack_t)(((acf_t)TOS)+1);
714 	TOS = (fstack_t)(((acf_t)TOS)-1);
1107 	if (is_digit(TOS, base, &value))
1110 		TOS = value;
1140 	hi = TOS;
1142 	TOS = lo;
1157 	a = (TOS & (sizeof (lforth_t) - 1));
1159 		TOS += (sizeof (lforth_t) - a);
1208 	d = TOS;
1242 	DS[-1] = TOS;
1243 	TOS    = d;
1252 	d = TOS;
1253 	TOS    = DS[-1];
1264 	d = TOS;
1283 	d = TOS;
1325 	TOS = d;
1340 	DS[2] = TOS;
1365 	DS[-2] = TOS;
1367 	TOS    = b;
1381 	DS[-2] = TOS;
1383 	TOS    = b;
1390 	TOS = TOS >> 1;
1397 	TOS = (ufstack_t)((ufstack_t)TOS) >> 1;
1404 	TOS = (ufstack_t)((ufstack_t)TOS) << 1;
1438 	TOS += d * sizeof (char);
1448 	TOS += d * sizeof (wforth_t);
1458 	TOS += d * sizeof (lforth_t);
1468 	TOS += d * sizeof (fstack_t);
1475 	TOS += sizeof (char);
1482 	TOS += sizeof (wforth_t);
1489 	TOS += sizeof (lforth_t);
1496 	TOS += sizeof (fstack_t);
1509 	TOS *= sizeof (wforth_t);
1516 	TOS *= sizeof (lforth_t);
1523 	TOS *= sizeof (fstack_t);
1550 	TOS = *((variable_t *)TOS);
1557 	TOS = *((lforth_t *)TOS);
1564 	TOS = *((wforth_t *)TOS);
1571 	TOS = *((s_wforth_t *)TOS);
1578 	TOS = *((uchar_t *)TOS);
1790 	if (d == TOS) {
2218 	while (TOS) {
2221 		if (TOS) {
2227 			flags = LINK_TO_FLAGS(ACF_TO_LINK(TOS));