Cross Reference: /illumos-gate/usr/src/common/ficl/vm.c

Lines Matching refs:dataTop
197 	_CHECK_STACK(vm->dataStack, dataTop, pop, push)
225 		vm->dataStack->top = dataTop;	\
232 		dataTop = vm->dataStack->top;	\
241 	register ficlCell *dataTop;
314 			(++dataTop)->i = instruction;
335 			(++dataTop)->i = ficlInstruction0 - instruction;
350 			(++dataTop)->p = cp;
351 			(++dataTop)->i = length;
366 			(++dataTop)->p = s;
402 			*++dataTop = cell[1];
405 			*++dataTop = cell[0];
409 			cell[0] = *dataTop--;
412 			cell[0] = *dataTop--;
413 			cell[1] = *dataTop--;
451 	cell = (cp); *++dataTop = cell[1]; *++dataTop = *cell; continue
453 	cell = (cp); *++dataTop = *cell; continue
455 	cell = (cp); *cell = *dataTop--; cell[1] = *dataTop--; continue
457 	cell = (cp); *cell = *dataTop--; continue
474 			(++dataTop)->i = *ip++;
479 			(++dataTop)->i = ip[1];
480 			(++dataTop)->i = ip[0];
503 		 * 1) dataTop = frame
574 			i = (dataTop--)->i;
575 			dataTop->i += i;
580 			i = (dataTop--)->i;
581 			dataTop->i -= i;
586 			dataTop->i++;
591 			dataTop->i--;
596 			dataTop->i += 2;
601 			dataTop->i -= 2;
605 			ficlInteger i = dataTop->i;
607 			(++dataTop)->i = i;
614 			if (dataTop->i != 0) {
615 				dataTop[1] = dataTop[0];
616 				dataTop++;
624 			swap = dataTop[0];
625 			dataTop[0] = dataTop[-1];
626 			dataTop[-1] = swap;
632 			dataTop--;
637 			dataTop -= 2;
642 			dataTop[1] = dataTop[-1];
643 			dataTop[2] = *dataTop;
644 			dataTop += 2;
649 			dataTop[1] = dataTop[-1];
650 			dataTop++;
655 			dataTop[1] = dataTop[-3];
656 			dataTop[2] = dataTop[-2];
657 			dataTop += 2;
662 			i = dataTop->i;
666 			*dataTop = dataTop[-i - 1];
683 			i = (dataTop--)->i;
690 			c = dataTop[-i];
691 			memmove(dataTop - i, dataTop - (i - 1),
693 			*dataTop = c;
710 			i = (dataTop--)->i;
717 			c = *dataTop;
718 			memmove(dataTop - (i - 1), dataTop - i,
720 			dataTop[-i] = c;
732 			c = *dataTop;
733 			c2 = dataTop[-1];
735 			*dataTop = dataTop[-2];
736 			dataTop[-1] = dataTop[-3];
738 			dataTop[-2] = c;
739 			dataTop[-3] = c2;
746 			cell = (ficlCell *)(dataTop--)->p;
747 			cell->i += (dataTop--)->i;
754 			integer32 = (ficlUnsigned32 *)dataTop->i;
755 			dataTop->u = (ficlUnsigned)*integer32;
762 			integer32 = (ficlUnsigned32 *)(dataTop--)->p;
763 			*integer32 = (ficlUnsigned32)((dataTop--)->u);
770 			integer16 = (ficlUnsigned16 *)dataTop->p;
771 			dataTop->u = ((ficlUnsigned)*integer16);
778 			integer16 = (ficlUnsigned16 *)(dataTop--)->p;
779 			*integer16 = (ficlUnsigned16)((dataTop--)->u);
786 			integer8 = (ficlUnsigned8 *)dataTop->p;
787 			dataTop->u = ((ficlUnsigned)*integer8);
794 			integer8 = (ficlUnsigned8 *)(dataTop--)->p;
795 			*integer8 = (ficlUnsigned8)((dataTop--)->u);
806 			dataTop->i = FICL_BOOL(dataTop->i == 0);
811 			dataTop->i = FICL_BOOL(dataTop->i < 0);
816 			dataTop->i = FICL_BOOL(dataTop->i > 0);
821 			i = (dataTop--)->i;
822 			dataTop->i = FICL_BOOL(dataTop->i == i);
827 			i = (dataTop--)->i;
828 			dataTop->i = FICL_BOOL(dataTop->i < i);
833 			u = (dataTop--)->u;
834 			dataTop->i = FICL_BOOL(dataTop->u < u);
839 			i = (dataTop--)->i;
840 			dataTop->i = dataTop->i & i;
845 			i = (dataTop--)->i;
846 			dataTop->i = dataTop->i | i;
851 			i = (dataTop--)->i;
852 			dataTop->i = dataTop->i ^ i;
857 			dataTop->i = ~dataTop->i;
866 			*++returnTop = *dataTop--;
872 			*++dataTop = *returnTop--;
878 			*++dataTop = *returnTop;
884 			*++returnTop = dataTop[-1];
885 			*++returnTop = dataTop[0];
886 			dataTop -= 2;
892 			*++dataTop = returnTop[-1];
893 			*++dataTop = returnTop[0];
900 			*++dataTop = returnTop[-1];
901 			*++dataTop = returnTop[0];
914 			c = (char)(dataTop--)->i;
915 			u = (dataTop--)->u;
916 			memory = (char *)(dataTop--)->p;
947 			nBits = (dataTop--)->u;
948 			x1 = dataTop->u;
949 			dataTop->u = x1 << nBits;
958 			nBits = (dataTop--)->u;
959 			x1 = dataTop->u;
960 			dataTop->u = x1 >> nBits;
972 			n2 = (dataTop--)->i;
973 			n1 = dataTop->i;
975 			dataTop->i = ((n1 > n2) ? n1 : n2);
984 			n2 = (dataTop--)->i;
985 				n1 = dataTop->i;
987 			dataTop->i = ((n1 < n2) ? n1 : n2);
1009 			u = (dataTop--)->u;
1010 			addr2 = (dataTop--)->p;
1011 			addr1 = (dataTop--)->p;
1034 			s = dataTop->i;
1037 			(++dataTop)->i = (s < 0) ? -1 : 0;
1074 			u2  = (dataTop--)->u;
1075 			cp2 = (char *)(dataTop--)->p;
1076 			u1  = (dataTop--)->u;
1077 			cp1 = (char *)(dataTop--)->p;
1099 			(++dataTop)->i = n;
1108 			(++dataTop)->i = random();
1116 			srandom((dataTop--)->i);
1122 			y = (dataTop--)->i;
1123 			x = dataTop->i;
1124 			dataTop->i = FICL_BOOL(x > y);
1168 			if ((dataTop--)->i) {
1192 			a = (dataTop--)->u;
1193 			b = dataTop->u;
1199 				dataTop--;
1213 			index = *dataTop--;
1214 			limit = *dataTop--;
1229 			index = *dataTop--;
1230 			limit = *dataTop--;
1260 				increment = (dataTop--)->i;
1294 			*++dataTop = *returnTop;
1298 			*++dataTop = returnTop[-3];
1302 			*++dataTop = returnTop[-6];
1322 			(++dataTop)->p = (cell + 1);
1332 			FLOAT_PUSH_CELL_POINTER_DOUBLE((dataTop--)->p);
1337 			FLOAT_PUSH_CELL_POINTER((dataTop--)->p);
1342 			FLOAT_POP_CELL_POINTER_DOUBLE((dataTop--)->p);
1347 			FLOAT_POP_CELL_POINTER((dataTop--)->p);
1360 			PUSH_CELL_POINTER_DOUBLE((dataTop--)->p);
1369 			PUSH_CELL_POINTER((dataTop--)->p);
1379 			POP_CELL_POINTER_DOUBLE((dataTop--)->p);
1387 			POP_CELL_POINTER((dataTop--)->p);
1394 			ficlDictionaryAppendCell(dictionary, *dataTop--);
1404 			c = (char)(dataTop--)->i;
1411 			dataTop->i *= sizeof (ficlCell);
1416 			dataTop->i += sizeof (ficlCell);
1421 			i = (dataTop--)->i;
1422 			dataTop->i *= i;
1427 			dataTop->i = - dataTop->i;
1432 			i = (dataTop--)->i;
1433 			dataTop->i /= i;
1453 			n2    = dataTop[0].i;
1454 			FICL_INTEGER_TO_2INTEGER(dataTop[-1].i, n1);
1457 			dataTop[-1].i = qr.remainder;
1458 			dataTop[0].i = FICL_2UNSIGNED_GET_LOW(qr.quotient);
1464 			dataTop->i <<= 1;
1469 			dataTop->i >>= 1;
1477 			z = (dataTop--)->i;
1478 			y = (dataTop--)->i;
1479 			x = dataTop->i;
1482 			dataTop->i = FICL_2UNSIGNED_GET_LOW(
1494 			z = (dataTop--)->i;
1495 			y = dataTop[0].i;
1496 			x = dataTop[-1].i;
1501 			dataTop[-1].i = qr.remainder;
1502 			dataTop[0].i = FICL_2UNSIGNED_GET_LOW(qr.quotient);
1597 			f = (ficlFloat)(dataTop--)->f;
1609 			f = (ficlFloat)(dataTop--)->f;
1621 			f = (ficlFloat)(dataTop--)->f;
1633 			f = (ficlFloat)(dataTop--)->f;
1645 			f = (ficlFloat)(dataTop--)->f;
1657 			f = (ficlFloat)(dataTop--)->f;
1669 			(++floatTop)->f = ((dataTop--)->f);
1680 			(++dataTop)->i = ((floatTop--)->i);
1693 			cell = (ficlCell *)(dataTop--)->p;
1794 			c = *dataTop--;
1814 			i = (dataTop--)->i;
1843 			i = (dataTop--)->i;
1884 			(++dataTop)->i = FICL_BOOL((floatTop--)->f != 0.0f);
1895 			(++dataTop)->i = FICL_BOOL((floatTop--)->f < 0.0f);
1906 			(++dataTop)->i = FICL_BOOL((floatTop--)->f > 0.0f);
1918 			(++dataTop)->i = FICL_BOOL((floatTop--)->f == f);
1930 			(++dataTop)->i = FICL_BOOL((floatTop--)->f < f);
1942 			(++dataTop)->i = FICL_BOOL((floatTop--)->f > f);
1954 			*++dataTop = *floatTop--;
1961 			*++floatTop = *dataTop--;
1984 			(++dataTop)->p = (fw->param + 1);
1989 			(++dataTop)->p = fw->param;
2019 			(++dataTop)->p = &vm->user[i];