Cross Reference: /illumos-gate/usr/src/lib/efcode/engine/forth.c

Lines Matching refs:DS
63 	d = POP(DS);
73 	d = POP(DS);
83 	d = POP(DS);
94 	d = POP(DS);
95 	o = t = POP(DS);
122 	PUSH(DS, rem);
123 	PUSH(DS, t);
135 	u2 = POP(DS);
136 	u1 = POP(DS);
140 	PUSH(DS, u1 % u2);
141 	PUSH(DS, u1 / u2);
166 	d = POP(DS);
176 	d = POP(DS);
186 	d = POP(DS);
203 	d = POP(DS);
213 	d = POP(DS);
223 	d = POP(DS);
247 	d = POP(DS);
257 	d = POP(DS);
265 	PUSH(RS, POP(DS));
272 	PUSH(DS, POP(RS));
279 	PUSH(DS, *RS);
348 	d = POP(DS);
358 	d = POP(DS);
368 	d = POP(DS);
378 	d = POP(DS);
389 	d = POP(DS);
399 	d = POP(DS);
409 	d = POP(DS);
419 	d = POP(DS);
429 	d = POP(DS);
439 	d = POP(DS);
449 	hi = (u_lforth_t)POP(DS);
450 	lo = (u_lforth_t)POP(DS);
460 	hi = (u_lforth_t)POP(DS);
461 	lo = (u_lforth_t)POP(DS);
468 	PUSH(DS, *IP);
537 	d.l_lf = POP(DS);
539 		PUSH(DS, d.l_wf[(FW_PER_FL - 1) - i]);
553 		d.l_wf[i] = POP(DS);
554 	PUSH(DS, d.l_lf);
567 	d.l_lf = POP(DS);
570 	PUSH(DS, c.l_lf);
583 	d.l_lf = POP(DS);
585 		PUSH(DS, d.l_bytes[(sizeof (lforth_t) - 1) - i]);
599 		d.l_bytes[i] = POP(DS);
600 	PUSH(DS, (fstack_t)d.l_lf);
613 	d.l_lf = POP(DS);
616 	PUSH(DS, c.l_lf);
629 	d.w_wf = POP(DS);
631 		PUSH(DS, d.w_bytes[(sizeof (wforth_t) - 1) - i]);
645 		d.w_bytes[i] = POP(DS);
646 	PUSH(DS, d.w_wf);
659 	d.w_wf = POP(DS);
662 	PUSH(DS, c.w_wf);
687 	buf = (char *)POP(DS);
688 	len = (size_t)POP(DS);
703 	PUSH(DS, *len);
740 	u1 = POP(DS);
741 	u2 = POP(DS);
756 	u = (uint32_t)POP(DS);
760 	PUSH(DS, urem);
761 	PUSH(DS, uquot);
840 	PUSH(DS, (fstack_t)HERE);
850 	PUSH(DS, (fstack_t)HERE);
860 	PUSH(DS, (fstack_t)HERE);
870 	PUSH(DS, (fstack_t)HERE);
889 	PUSH(DS, (fstack_t)HERE);
901 	addr = POP(DS);
903 		PUSH(DS, addr);
917 	addr = POP(DS);
920 		PUSH(DS, addr);
932 	addr = POP(DS);
934 		PUSH(DS, addr);
948 	addr = POP(DS);
951 		PUSH(DS, addr);
966 	len = POP(DS);
967 	addr = POP(DS);
970 		PUSH(DS, addr);
973 		PUSH(DS, addr);
988 	len = POP(DS);
989 	addr = POP(DS);
992 		PUSH(DS, addr);
995 		PUSH(DS, addr);
1010 	len = POP(DS);
1011 	addr = POP(DS);
1014 		PUSH(DS, addr);
1017 		PUSH(DS, addr);
1025 	PUSH(DS, (fstack_t)&env->num_base);
1037 	PUSH(DS, (fstack_t)&env->state);
1094 		PUSH(DS, -1);
1097 		PUSH(DS, value);
1098 		PUSH(DS, 0);
1109 	base = POP(DS);
1111 		PUSH(DS, 0);
1114 		PUSH(DS, -1);
1121 	PUSH(DS, ' ');
1127 	PUSH(DS, '\b');
1133 	PUSH(DS, '\a');
1142 	lo = DS[-1];
1144 	DS[-1] = lo+hi;
1151 	PUSH(DS, (fstack_t)HERE);
1195 	PUSH(DS, (fstack_t)WA);
1202 	(void) POP(DS);
1212 	PUSH(DS, d);
1221 	d = DS[-1];
1222 	PUSH(DS, d);
1231 	d = DS[-1];
1232 	DS[-1] = DS[0];
1233 	DS[0]  = d;
1243 	d = DS[-2];
1244 	DS[-2] = DS[-1];
1245 	DS[-1] = TOS;
1256 	TOS    = DS[-1];
1257 	DS[-1] = DS[-2];
1258 	DS[-2] = d;
1269 	PUSH(DS, d);
1288 		PUSH(DS, d);
1296 	d =  DS - env->ds0;
1297 	PUSH(DS, d);
1306 	p = POP(DS);
1309 	p = DS[-p];
1310 	PUSH(DS, p);
1319 	r = POP(DS);
1323 	d = DS[-r];
1325 		DS[-r] = DS[ -(r-1) ];
1335 	DS -= 2;
1342 	DS[1] = DS[-1];
1343 	DS[2] = TOS;
1344 	DS += 2;
1353 	a = DS[-3];
1354 	b = DS[-2];
1355 	PUSH(DS, a);
1356 	PUSH(DS, b);
1365 	a = DS[-3];
1366 	b = DS[-2];
1367 	DS[-3] = DS[-1];
1368 	DS[-2] = TOS;
1369 	DS[-1] = a;
1379 	a = DS[-5];
1380 	b = DS[-4];
1381 	DS[-5] = DS[-3];
1382 	DS[-4] = DS[-2];
1383 	DS[-3] = DS[-1];
1384 	DS[-2] = TOS;
1385 	DS[-1] = a;
1413 	PUSH(DS, sizeof (char));
1419 	PUSH(DS, sizeof (wforth_t));
1425 	PUSH(DS, sizeof (lforth_t));
1431 	PUSH(DS, sizeof (fstack_t));
1440 	d = POP(DS);
1450 	d = POP(DS);
1460 	d = POP(DS);
1470 	d = POP(DS);
1535 	d = (variable_t *)POP(DS);
1545 	d = (variable_t *)POP(DS);
1590 	dptr = (variable_t *)POP(DS);
1591 	*dptr = POP(DS);
1600 	dptr = (variable_t *)POP(DS);
1601 	*dptr = POP(DS) + *dptr;
1610 	dptr = (lforth_t *)POP(DS);
1611 	*dptr = (lforth_t)POP(DS);
1620 	dptr = (wforth_t *)POP(DS);
1621 	*dptr = (wforth_t)POP(DS);
1630 	dptr = (uchar_t *)POP(DS);
1631 	*dptr = (uchar_t)POP(DS);
1640 	d = (variable_t *)POP(DS);
1641 	PUSH(DS, (fstack_t)(d + 1));
1643 	PUSH(DS, (fstack_t)d);
1653 	d = (variable_t *)POP(DS);
1654 	PUSH(DS, (fstack_t)d);
1656 	PUSH(DS, (fstack_t)(d + 1));
1670 	len  = (size_t)POP(DS);
1671 	dest = (void *)POP(DS);
1672 	src  = (void *)POP(DS);
1685 	val  = (uchar_t)POP(DS);
1686 	len  = (size_t)POP(DS);
1687 	dest = (void *)POP(DS);
1699 	len  = (size_t)POP(DS);
1700 	str1 = (char *)POP(DS);
1701 	str2 = (char *)POP(DS);
1707 	PUSH(DS, res);
1726 	PUSH(DS, (fstack_t)HERE);
1742 		PUSH(DS, d);
1757 	token_t *prev = (token_t *)POP(DS);
1778 	flag = POP(DS);
1792 	d = POP(DS);
1794 		(void) POP(DS);
1841 	d = POP(DS);
1893 	lo = POP(DS);
1894 	hi = POP(DS);
1907 	lo = POP(DS);
1908 	hi = POP(DS);
1947 	PUSH(DS, i);
1957 	PUSH(DS, j);
1979 		PUSH(DS, 0);
1980 		PUSH(DS, 0);
1992 	PUSH(DS, (fstack_t)dest);
1993 	PUSH(DS, len);
2054 	PUSH(DS, (fstack_t)&env->current);
2061 	PUSH(DS, (fstack_t)&CONTEXT);
2120 	len = POP(DS);
2121 	str = (uchar_t *)POP(DS);
2159 	PUSH(DS, 0);
2179 	voc = (token_t *)POP(DS);
2204 		PUSH(DS, (fstack_t)env->order[i]);
2209 		PUSH(DS, (fstack_t)acf);
2210 		PUSH(DS, TRUE);
2212 		PUSH(DS, FALSE);
2243 			bad = POP(DS);
2268 	eval_bufp->maxlen = POP(DS);
2269 	eval_bufp->buffer = (char *)POP(DS);
2304 		PUSH(DS, offset);
2307 			*dptr++ = MYSELF->data[INIT_DATA][offset++] = POP(DS);
2322 	PUSH(DS, (variable_t)(*WA));
2342 	defer_xt = (acf_t)POP(DS);
2349 	PUSH(DS, *((variable_t *)defer_xt));
2399 	new->ds		= DS-1;
2406 	PUSH(DS, new->code);
2439 		DS		= efp->ds;
2453 	t = POP(DS);