binutils/gas/expr.c

1383    After expr(RANK,resultP) input_line_pointer->operator of rank <= RANK.
1636       expressionS *resultP,	/* Deliver result here.  */
1652   retval = operand (resultP, mode);
1696       /* left-hand quantity in resultP.  */
1700       if (resultP->X_op == O_big)
1702 	  if (resultP->X_add_number > 0)
1706 	  resultP->X_op = O_constant;
1707 	  resultP->X_add_number = 0;
1708 	  resultP->X_add_symbol = NULL;
1709 	  resultP->X_op_symbol = NULL;
1725       if (md_optimize_expr (resultP, op_left, &right))
1735 	  resultP->X_add_number += right.X_add_number;
1740 	       && resultP->X_op == O_symbol
1743 		   || right.X_add_symbol == resultP->X_add_symbol)
1744 	       && frag_offset_fixed_p (symbol_get_frag (resultP->X_add_symbol),
1748 	  resultP->X_add_number -= right.X_add_number;
1749 	  resultP->X_add_number -= frag_off / OCTETS_PER_BYTE;
1750 	  resultP->X_add_number += (S_GET_VALUE (resultP->X_add_symbol)
1752 	  resultP->X_op = O_constant;
1753 	  resultP->X_add_symbol = 0;
1758 	  resultP->X_add_number -= right.X_add_number;
1760       else if (op_left == O_add && resultP->X_op == O_constant)
1763 	  resultP->X_op = right.X_op;
1764 	  resultP->X_add_symbol = right.X_add_symbol;
1765 	  resultP->X_op_symbol = right.X_op_symbol;
1766 	  resultP->X_add_number += right.X_add_number;
1769       else if (resultP->X_op == O_constant && right.X_op == O_constant)
1781 	    case O_multiply:		resultP->X_add_number *= v; break;
1782 	    case O_divide:		resultP->X_add_number /= v; break;
1783 	    case O_modulus:		resultP->X_add_number %= v; break;
1784 	    case O_left_shift:		resultP->X_add_number <<= v; break;
1788 	      resultP->X_add_number =
1789 		(offsetT) ((valueT) resultP->X_add_number >> (valueT) v);
1791 	    case O_bit_inclusive_or:	resultP->X_add_number |= v; break;
1792 	    case O_bit_or_not:		resultP->X_add_number |= ~v; break;
1793 	    case O_bit_exclusive_or:	resultP->X_add_number ^= v; break;
1794 	    case O_bit_and:		resultP->X_add_number &= v; break;
1798 	    case O_subtract:		resultP->X_add_number -= v; break;
1800 	      resultP->X_add_number =
1801 		resultP->X_add_number == v ? ~ (offsetT) 0 : 0;
1804 	      resultP->X_add_number =
1805 		resultP->X_add_number != v ? ~ (offsetT) 0 : 0;
1808 	      resultP->X_add_number =
1809 		resultP->X_add_number <  v ? ~ (offsetT) 0 : 0;
1812 	      resultP->X_add_number =
1813 		resultP->X_add_number <= v ? ~ (offsetT) 0 : 0;
1816 	      resultP->X_add_number =
1817 		resultP->X_add_number >= v ? ~ (offsetT) 0 : 0;
1820 	      resultP->X_add_number =
1821 		resultP->X_add_number >  v ? ~ (offsetT) 0 : 0;
1824 	      resultP->X_add_number = resultP->X_add_number && v;
1827 	      resultP->X_add_number = resultP->X_add_number || v;
1831       else if (resultP->X_op == O_symbol
1835 		   || (resultP->X_add_number == 0
1839 	  resultP->X_op = op_left;
1840 	  resultP->X_op_symbol = right.X_add_symbol;
1842 	    resultP->X_add_number += right.X_add_number;
1845 	      resultP->X_add_number -= right.X_add_number;
1856 	  resultP->X_add_symbol = make_expr_symbol (resultP);
1857 	  resultP->X_op_symbol = make_expr_symbol (&right);
1858 	  resultP->X_op = op_left;
1859 	  resultP->X_add_number = 0;
1860 	  resultP->X_unsigned = 1;
1882   if (resultP->X_add_symbol)
1883     symbol_mark_used (resultP->X_add_symbol);
1886     resolve_expression (resultP);
1888   return resultP->X_op == O_constant ? absolute_section : retval;