gas/config/tc-vax.c

2435   struct vop *operandP;
2484   for (operandP = v.vit_operand,
2490        operandP < end_operandP;
2492        operandP++, expP++, segP++, floatP++)
2494       if (operandP->vop_error)
2496 	  as_fatal (_("Aborting because statement has \"%s\""), operandP->vop_error);
2504 	  input_line_pointer = operandP->vop_expr_begin;
2505 	  c_save = operandP->vop_expr_end[1];
2506 	  operandP->vop_expr_end[1] = '\0';
2556 		  if (strchr ("s i", operandP->vop_short))
2602 	      if (operandP->vop_short == 's'
2603 		  || operandP->vop_short == 'i'
2604 		  || (operandP->vop_short == ' '
2605 		      && operandP->vop_reg == 0xF
2606 		      && (operandP->vop_mode & 0xE) == 0x8))
2609 		  if (operandP->vop_short == ' ')
2615 			  operandP->vop_short = 'i';
2616 			  operandP->vop_mode = 8;
2617 			  operandP->vop_reg = 0xF;	/* VAX PC.  */
2624 			      operandP->vop_short = 's';
2625 			      operandP->vop_mode = 0;
2626 			      operandP->vop_ndx = -1;
2627 			      operandP->vop_reg = -1;
2632 			      operandP->vop_short = 'i';
2633 			      operandP->vop_mode = 8;
2634 			      operandP->vop_reg = 0xF;	/* VAX PC */
2639 		  if (operandP->vop_short == 's')
2645 			  operandP->vop_short = 'i';
2646 			  operandP->vop_mode = 8;
2647 			  operandP->vop_reg = 0xF;	/* VAX PC.  */
2654 			      operandP->vop_short = 'i';
2655 			      operandP->vop_mode = 8;
2656 			      operandP->vop_reg = 0xF;	/* VAX PC.  */
2718 	  if (input_line_pointer != operandP->vop_expr_end + 1)
2723 	  operandP->vop_expr_end[1] = c_save;
2738   for (operandP = v.vit_operand,
2744        operandP < end_operandP;
2746        operandP++,
2751       if (operandP->vop_ndx >= 0)
2755 	  FRAG_APPEND_1_CHAR (0x40 + operandP->vop_ndx);
2764       at = operandP->vop_mode & 1;
2765       length = (operandP->vop_short == 'b'
2766 		? 1 : (operandP->vop_short == 'w'
2767 		       ? 2 : (operandP->vop_short == 'l'
2769       nbytes = operandP->vop_nbytes;
2770       if (operandP->vop_access == 'b')
2788 		      if (operandP->vop_width == VAX_WIDTH_UNCONDITIONAL_JUMP)
2798 			  if (operandP->vop_width == VAX_WIDTH_WORD_JUMP)
2809 			      know (operandP->vop_width == VAX_WIDTH_BYTE_JUMP);
2819 		      know (operandP->vop_width == VAX_WIDTH_CONDITIONAL_JUMP);
2847 			  if (operandP->vop_width == VAX_WIDTH_UNCONDITIONAL_JUMP)
2859 			      if (operandP->vop_width == VAX_WIDTH_WORD_JUMP)
2876 				  know (operandP->vop_width == VAX_WIDTH_BYTE_JUMP);
2925 			  if (operandP->vop_width == VAX_WIDTH_UNCONDITIONAL_JUMP)
2940 			      if (operandP->vop_width == VAX_WIDTH_WORD_JUMP)
2960 				  know (operandP->vop_width == VAX_WIDTH_BYTE_JUMP);
2980 			  know (operandP->vop_width == VAX_WIDTH_CONDITIONAL_JUMP);
2997 	  know (operandP->vop_access != 'b');
2999 	  know (operandP->vop_access != ' ');
3000 	  know (operandP->vop_access == 'a'
3001 		|| operandP->vop_access == 'm'
3002 		|| operandP->vop_access == 'r'
3003 		|| operandP->vop_access == 'v'
3004 		|| operandP->vop_access == 'w');
3005 	  if (operandP->vop_short == 's')
3013 		      operandP->vop_short = 'i';
3014 		      operandP->vop_mode = 8;
3015 		      operandP->vop_reg = 0xF;
3022 		  operandP->vop_short = 'i';
3023 		  operandP->vop_mode = 8;
3024 		  operandP->vop_reg = 0xF;
3027 	  if (operandP->vop_reg >= 0 && (operandP->vop_mode < 8
3028 		  || (operandP->vop_reg != 0xF && operandP->vop_mode < 10)))
3031 	      know (operandP->vop_mode > 3);
3032 	      FRAG_APPEND_1_CHAR (operandP->vop_mode << 4 | operandP->vop_reg);
3038 	      if (operandP->vop_reg == -1 && operandP->vop_short != 's')
3045 			  know (operandP->vop_short == ' ');
3056 			  know (operandP->vop_mode == 10 + at);
3066 			  know (operandP->vop_short != ' ');
3090 			  know ((length == 0 && operandP->vop_short == ' ')
3091 			     || (length > 0 && operandP->vop_short != ' '));
3119 				  know (operandP->vop_short == ' ');
3136 		  if (operandP->vop_mode < 0xA)
3139 		      if (operandP->vop_access == 'v'
3140 			  || operandP->vop_access == 'a')
3142 			  if (operandP->vop_access == 'v')
3151 			  && operandP->vop_mode == 8	/* No '@'.  */
3154 			  operandP->vop_short = 's';
3156 		      if (operandP->vop_short == 's')
3165 			  know (operandP->vop_reg == 0xF);
3167 			  if (flag_want_pic && operandP->vop_mode == 8
3173 			  p[0] = (operandP->vop_mode << 4) | 0xF;
3222 		      know ((length == 0 && operandP->vop_short == ' ')
3223 			    || (length > 0 && operandP->vop_short != ' '));
3245 		      know (operandP->vop_reg >= 0);
3246 		      p[0] = operandP->vop_reg