gas/config/tc-vax.c

2582   struct vop *operandP;
2631   for (operandP = v.vit_operand,
2637        operandP < end_operandP;
2639        operandP++, expP++, segP++, floatP++)
2641       if (operandP->vop_error)
2643 	  as_fatal (_("Aborting because statement has \"%s\""), operandP->vop_error);
2651 	  input_line_pointer = operandP->vop_expr_begin;
2652 	  c_save = operandP->vop_expr_end[1];
2653 	  operandP->vop_expr_end[1] = '\0';
2703 		  if (strchr ("s i", operandP->vop_short))
2749 	      if (operandP->vop_short == 's'
2750 		  || operandP->vop_short == 'i'
2751 		  || (operandP->vop_short == ' '
2752 		      && operandP->vop_reg == 0xF
2753 		      && (operandP->vop_mode & 0xE) == 0x8))
2756 		  if (operandP->vop_short == ' ')
2762 			  operandP->vop_short = 'i';
2763 			  operandP->vop_mode = 8;
2764 			  operandP->vop_reg = 0xF;	/* VAX PC.  */
2771 			      operandP->vop_short = 's';
2772 			      operandP->vop_mode = 0;
2773 			      operandP->vop_ndx = -1;
2774 			      operandP->vop_reg = -1;
2779 			      operandP->vop_short = 'i';
2780 			      operandP->vop_mode = 8;
2781 			      operandP->vop_reg = 0xF;	/* VAX PC */
2786 		  if (operandP->vop_short == 's')
2792 			  operandP->vop_short = 'i';
2793 			  operandP->vop_mode = 8;
2794 			  operandP->vop_reg = 0xF;	/* VAX PC.  */
2801 			      operandP->vop_short = 'i';
2802 			      operandP->vop_mode = 8;
2803 			      operandP->vop_reg = 0xF;	/* VAX PC.  */
2865 	  if (input_line_pointer != operandP->vop_expr_end + 1)
2870 	  operandP->vop_expr_end[1] = c_save;
2886   for (operandP = v.vit_operand,
2892        operandP < end_operandP;
2894        operandP++,
2899       if (operandP->vop_ndx >= 0)
2903 	  FRAG_APPEND_1_CHAR (0x40 + operandP->vop_ndx);
2912       at = operandP->vop_mode & 1;
2913       length = (operandP->vop_short == 'b'
2914 		? 1 : (operandP->vop_short == 'w'
2915 		       ? 2 : (operandP->vop_short == 'l'
2917       nbytes = operandP->vop_nbytes;
2918       if (operandP->vop_access == 'b')
2936 		      if (operandP->vop_width == VAX_WIDTH_UNCONDITIONAL_JUMP)
2946 			  if (operandP->vop_width == VAX_WIDTH_WORD_JUMP)
2957 			      know (operandP->vop_width == VAX_WIDTH_BYTE_JUMP);
2967 		      know (operandP->vop_width == VAX_WIDTH_CONDITIONAL_JUMP);
2995 			  if (operandP->vop_width == VAX_WIDTH_UNCONDITIONAL_JUMP)
3007 			      if (operandP->vop_width == VAX_WIDTH_WORD_JUMP)
3024 				  know (operandP->vop_width == VAX_WIDTH_BYTE_JUMP);
3073 			  if (operandP->vop_width == VAX_WIDTH_UNCONDITIONAL_JUMP)
3088 			      if (operandP->vop_width == VAX_WIDTH_WORD_JUMP)
3108 				  know (operandP->vop_width == VAX_WIDTH_BYTE_JUMP);
3128 			  know (operandP->vop_width == VAX_WIDTH_CONDITIONAL_JUMP);
3145 	  know (operandP->vop_access != 'b');
3147 	  know (operandP->vop_access != ' ');
3148 	  know (operandP->vop_access == 'a'
3149 		|| operandP->vop_access == 'm'
3150 		|| operandP->vop_access == 'r'
3151 		|| operandP->vop_access == 'v'
3152 		|| operandP->vop_access == 'w');
3153 	  if (operandP->vop_short == 's')
3161 		      operandP->vop_short = 'i';
3162 		      operandP->vop_mode = 8;
3163 		      operandP->vop_reg = 0xF;
3170 		  operandP->vop_short = 'i';
3171 		  operandP->vop_mode = 8;
3172 		  operandP->vop_reg = 0xF;
3175 	  if (operandP->vop_reg >= 0 && (operandP->vop_mode < 8
3176 		  || (operandP->vop_reg != 0xF && operandP->vop_mode < 10)))
3179 	      know (operandP->vop_mode > 3);
3180 	      FRAG_APPEND_1_CHAR (operandP->vop_mode << 4 | operandP->vop_reg);
3186 	      if (operandP->vop_reg == -1 && operandP->vop_short != 's')
3193 			  know (operandP->vop_short == ' ');
3204 			  know (operandP->vop_mode == 10 + at);
3214 			  know (operandP->vop_short != ' ');
3238 			  know ((length == 0 && operandP->vop_short == ' ')
3239 			     || (length > 0 && operandP->vop_short != ' '));
3267 				  know (operandP->vop_short == ' ');
3284 		  if (operandP->vop_mode < 0xA)
3287 		      if (operandP->vop_access == 'v'
3288 			  || operandP->vop_access == 'a')
3290 			  if (operandP->vop_access == 'v')
3299 			  && operandP->vop_mode == 8	/* No '@'.  */
3302 			  operandP->vop_short = 's';
3304 		      if (operandP->vop_short == 's')
3313 			  know (operandP->vop_reg == 0xF);
3315 			  if (flag_want_pic && operandP->vop_mode == 8
3322 			  p[0] = (operandP->vop_mode << 4) | 0xF;
3372 		      know ((length == 0 && operandP->vop_short == ' ')
3373 			    || (length > 0 && operandP->vop_short != ' '));
3402 		      know (operandP->vop_reg != 0xf);
3403 		      know (operandP->vop_reg >= 0);
3404 		      p[0] = operandP->vop_reg