Cross Reference: /ast/src/lib/libtksh/tcl/tclExpr.c

Lines Matching refs:value2
731     Value value2;			/* Second operand for current
749     value2.pv.buffer = value2.pv.next = value2.staticSpace;
750     value2.pv.end = value2.pv.buffer + STATIC_STRING_SPACE - 1;
751     value2.pv.expandProc = TclExpandParseValue;
752     value2.pv.clientData = (ClientData) NULL;
852 	result = ExprLex(interp, infoPtr, &value2);
859 	value2.pv.next = value2.pv.buffer;
902 			&value2);
928 		    value2.pv.next = value2.pv.buffer;
931 			    precTable[QUESTY] - 1, &value2);
936 			    precTable[QUESTY] - 1, &value2);
954 			&value2);
958 		    &value2);
989 			|| (value2.type == TYPE_STRING)) {
994 		    if (value2.type == TYPE_INT) {
995 			value2.doubleValue = value2.intValue;
996 			value2.type = TYPE_DOUBLE;
998 		} else if (value2.type == TYPE_DOUBLE) {
1015 		 } else if (value2.type != TYPE_INT) {
1016 		     badType = value2.type;
1030 		    if (value2.type != TYPE_STRING) {
1031 			ExprMakeString(interp, &value2);
1033 		} else if (value2.type == TYPE_STRING) {
1038 		    if (value2.type == TYPE_INT) {
1039 			value2.doubleValue = value2.intValue;
1040 			value2.type = TYPE_DOUBLE;
1042 		} else if (value2.type == TYPE_DOUBLE) {
1060 		if (value2.type == TYPE_STRING) {
1061 		    badType = value2.type;
1091 		    valuePtr->intValue = valuePtr->intValue * value2.intValue;
1093 		    valuePtr->doubleValue *= value2.doubleValue;
1102 		    if (value2.intValue == 0) {
1119 		    divisor = value2.intValue;
1137 		    if (value2.doubleValue == 0.0) {
1140 		    valuePtr->doubleValue /= value2.doubleValue;
1145 		    valuePtr->intValue = valuePtr->intValue + value2.intValue;
1147 		    valuePtr->doubleValue += value2.doubleValue;
1152 		    valuePtr->intValue = valuePtr->intValue - value2.intValue;
1154 		    valuePtr->doubleValue -= value2.doubleValue;
1158 		valuePtr->intValue <<= value2.intValue;
1169 			    ~((~valuePtr->intValue) >> value2.intValue);
1171 		    valuePtr->intValue >>= value2.intValue;
1177 			valuePtr->intValue < value2.intValue;
1180 			valuePtr->doubleValue < value2.doubleValue;
1183 			    strcmp(valuePtr->pv.buffer, value2.pv.buffer) < 0;
1190 			valuePtr->intValue > value2.intValue;
1193 			valuePtr->doubleValue > value2.doubleValue;
1196 			    strcmp(valuePtr->pv.buffer, value2.pv.buffer) > 0;
1203 			valuePtr->intValue <= value2.intValue;
1206 			valuePtr->doubleValue <= value2.doubleValue;
1209 			    strcmp(valuePtr->pv.buffer, value2.pv.buffer) <= 0;
1216 			valuePtr->intValue >= value2.intValue;
1219 			valuePtr->doubleValue >= value2.doubleValue;
1222 			    strcmp(valuePtr->pv.buffer, value2.pv.buffer) >= 0;
1229 			valuePtr->intValue == value2.intValue;
1232 			valuePtr->doubleValue == value2.doubleValue;
1235 			    strcmp(valuePtr->pv.buffer, value2.pv.buffer) == 0;
1242 			valuePtr->intValue != value2.intValue;
1245 			valuePtr->doubleValue != value2.doubleValue;
1248 			    strcmp(valuePtr->pv.buffer, value2.pv.buffer) != 0;
1253 		valuePtr->intValue &= value2.intValue;
1256 		valuePtr->intValue ^= value2.intValue;
1259 		valuePtr->intValue |= value2.intValue;
1269 		if (value2.type == TYPE_DOUBLE) {
1270 		    value2.intValue = value2.doubleValue != 0;
1271 		    value2.type = TYPE_INT;
1273 		valuePtr->intValue = valuePtr->intValue && value2.intValue;
1276 		if (value2.type == TYPE_DOUBLE) {
1277 		    value2.intValue = value2.doubleValue != 0;
1278 		    value2.type = TYPE_INT;
1280 		valuePtr->intValue = valuePtr->intValue || value2.intValue;
1291     if (value2.pv.buffer != value2.staticSpace) {
1292 	ckfree(value2.pv.buffer);