dist/keama/reduce.c

42 					       struct element *right);
137 		 *               "right": <expression> }
144 		struct element *right;
156 		right = mapGet(arg, "right");
157 		if (right == NULL) {
158 			debug("can't get equal right branch");
161 		return reduce_equal_expression(left, right);
169                  *               "right": <expression> }
176 		struct element *right;
190 		right = mapGet(arg, "right");
191 		if (right == NULL) {
192 			debug("can't get not-equal right branch");
195 		equal = reduce_equal_expression(left, right);
209 		 *               "right": <data_expression> }
211 		 * semantics: evaluate branches, compile right as a
221 		 *               "right": <data_expression> }
223 		 * semantics: evaluate branches, compile right as a
233 		 *               "right": <boolean_expression> }
240 		struct element *right;
253 		right = mapGet(arg, "right");
254 		if (right == NULL) {
255 			debug("can't get and right branch");
261 		right = reduce_boolean_expression(right);
262 		if ((right == NULL) || (right->type != ELEMENT_STRING))
267 		concatString(result, stringValue(right));
277 		 *               "right": <boolean_expression> }
284 		struct element *right;
297 		right = mapGet(arg, "right");
298 		if (right == NULL) {
299 			debug("can't get or right branch");
305 		right = reduce_boolean_expression(right);
306 		if ((right == NULL) || (right->type != ELEMENT_STRING))
311 		concatString(result, stringValue(right));
661 		 *               "right": <data_expression> }
667 		struct element *right;
680 		right = mapGet(arg, "right");
681 		if (right == NULL) {
682 			debug("can't get concat right branch");
688 			right = reduce_data_expression(right);
689 			if ((right == NULL) || (right->type != ELEMENT_STRING))
694 			concatString(result, stringValue(right));
701 		/* right is a literal case */
702 		if (right->type == ELEMENT_STRING) {
707 			concatString(result, quote(stringValue(right)));
711 		right = reduce_data_expression(right);
712 		if ((right == NULL) || (right->type != ELEMENT_STRING))
717 		concatString(result, stringValue(right));
965 reduce_equal_expression(struct element *left, struct element *right)
973 	if (!is_data_expression(left) || !is_data_expression(right))
979 		right = reduce_data_expression(right);
980 		if ((right == NULL) || (right->type != ELEMENT_STRING))
985 		concatString(result, stringValue(right));
992 	/* right is a literal case */
993 	if (right->type == ELEMENT_STRING) {
998 		concatString(result, quote(stringValue(right)));
1001 	right = reduce_data_expression(right);
1002 	if ((right == NULL) || (right->type != ELEMENT_STRING))
1008 	concatString(result, stringValue(right));