comparison src/mule-ccl.c @ 460:223736d75acb r21-2-45

Import from CVS: tag r21-2-45
author cvs
date Mon, 13 Aug 2007 11:43:24 +0200
parents e7ef97881643
children 0784d089fdc9
comparison
equal deleted inserted replaced
459:9d4fd877b885 460:223736d75acb
1583 if (point < 0) 1583 if (point < 0)
1584 { 1584 {
1585 /* +1 is for including separator. */ 1585 /* +1 is for including separator. */
1586 point = -point + 1; 1586 point = -point + 1;
1587 if (mapping_stack_pointer 1587 if (mapping_stack_pointer
1588 >= &mapping_stack[MAX_MAP_SET_LEVEL]) 1588 >= mapping_stack + countof (mapping_stack))
1589 CCL_INVALID_CMD; 1589 CCL_INVALID_CMD;
1590 PUSH_MAPPING_STACK (map_set_rest_length - point, 1590 PUSH_MAPPING_STACK (map_set_rest_length - point,
1591 reg[rrr]); 1591 reg[rrr]);
1592 map_set_rest_length = point; 1592 map_set_rest_length = point;
1593 reg[rrr] = op; 1593 reg[rrr] = op;
1664 break; 1664 break;
1665 } 1665 }
1666 else if (SYMBOLP (content)) 1666 else if (SYMBOLP (content))
1667 { 1667 {
1668 if (mapping_stack_pointer 1668 if (mapping_stack_pointer
1669 >= &mapping_stack[MAX_MAP_SET_LEVEL]) 1669 >= mapping_stack + countof (mapping_stack))
1670 CCL_INVALID_CMD; 1670 CCL_INVALID_CMD;
1671 PUSH_MAPPING_STACK (map_set_rest_length, reg[rrr]); 1671 PUSH_MAPPING_STACK (map_set_rest_length, reg[rrr]);
1672 PUSH_MAPPING_STACK (map_set_rest_length, op); 1672 PUSH_MAPPING_STACK (map_set_rest_length, op);
1673 stack_idx_of_map_multiple = stack_idx + 1; 1673 stack_idx_of_map_multiple = stack_idx + 1;
1674 CCL_CALL_FOR_MAP_INSTRUCTION (content, current_ic); 1674 CCL_CALL_FOR_MAP_INSTRUCTION (content, current_ic);