gas/config/tc-vax.c

11    GAS is distributed in the hope that it will be useful,
24 #include "obstack.h"		/* For FRAG_APPEND_1_CHAR macro in "frags.h" */
32 /* These chars start a comment anywhere in a source file (except inside
42 /* Chars that can be used to separate mant from exp in floating point nums.  */
46    as in 0f123.456
51    changed in read.c .  Ideally it shouldn't have to know about it at all,
83    The branch displacement is always the last operand, even in
85    For VAX, we encode the relax_substateTs (in e.g. fr_substate) as:
96    The address usually has some constant bytes in it as well.
182  We sometimes store context in the operand literal. This way we can figure out
265 #define STATE_UNDF			(3)	/* Symbol undefined in pass1.  */
279 void				/* Knows about order of bytes in address.  */
318 /* Copy a bignum from in to out.
323    wants to know length (in chars) of the input bignum.  */
326 bignum_copy (LITTLENUM_TYPE *in,
327 	     int in_length,	/* in sizeof(littlenum)s */
329 	     int out_length	/* in sizeof(littlenum)s */)
338       memcpy ((void *) out, (void *) in,
340       for (p = in + in_length - 1; p >= in; --p)
345       significant_littlenums_dropped = p - in - in_length + 1;
352       memcpy ((char *) out, (char *) in,
368    Return the correct fr_subtype in the frag and the growth beyond
393 	     due to a limitation in the NetBSD linker.  */
408 	         let's hope they'll become local in the final link.  */
478 	  /* Return the growth in the fixed part of the frag.  */
694    This is a vaguely modular set of routines in C to parse VAX
729    30dec85 Dean Elsner. Widen typedef vax_opcodeT in "vax-inst.h"
734   	Invented so we know hw many bytes a "I^#42" needs in its immediate
735   	operand. Revised struct vop in "vax-inst.h": explicitly include
749    Out:	the length of an operand of that type, in bytes.
775    Please would someone arrange these in decreasing frequency of opcode?
794    The opcode is in the usual place [low-order n*8 bits]. This means
873 /* CASEx has no branch addresses in our conception of it.  */
943 /* Can be called any time.  More arguments may appear in future.  */
957    If you want, I will include the 'synthetic' jXXX instructions in the
992    Case is not important in a name.
1019    in four single chars. Returns -1 if the register isn't recognized,
1088 /* Parse a vax operand in DEC assembler notation.
1118    optimising to (say) a "B^" if you are lucky in the way you link.
1121    If there is some other use for "G^", feel free to code it in!
1132    In future, we should be able to 'compose' error messages in a scratch area
1214    buried in that syntax. For example if we see @...(Rn) we don't check
1245    using the vop in vopP. vopP's vop_access and vop_width. We fill _ndx, _reg,
1276   /* Preserve q in case we backup.  */
1279   /* Note: index mode is in ndx, this is.  */
1342      cyborg would have [...] trailing an expression in a VAX-like assembler.
1345      ending in ']'.  */
1365 	  /* Since we saw a ']' we will demand a register name in the [].
1368 	    err = _("bad register in []");
1419 	      /* Since we saw a ')' we will demand a register name in the ')'.
1429 		  /* err = "unknown register in ()"; */
1437 	     Otherwise paren==1 and reg = register in "()".  */
1467 	     We remember to save q, in case we didn't want "Rn" anyway.  */
1504      in:  at	?
1532      in:  at	?
1578      in:  at       0
1600 	      /* Darn! we saw S^#Rnn ! put the Rnn back in
1621      in:  at       0
1661      in:  at
1692      in:  at
1740      in:  at       optional
1772 	     vop_nbytes is number of bytes in operand.
1786      in:  at       optional
1838    The string must be a bare single instruction in dec-vax (with BSD4 frobs)
1842    The vax instruction is returned in exploded form, since we have no
1853    it means a bug in our code, not in the user's text.
1868   /* scan operands in struct vit */
1880   /* MUST end in end-of-string or exactly 1 space.  */
1933 		as_fatal (_("odd number of bytes in operand description"));
2049    We declare arrays non-local in case some of our tiny-minded machines
2425 /* vax:md_assemble() emit frags for 1 instruction given in textual form.  */
2463   /* 0, or 1 if '@' is in addressing mode.  */
2465   /* From vop_nbytes: vax_operand_width (in bytes) */
2475      Should goofed be 1, then this instruction will wedge in any pass,
2477      errors. That is, without changing label values in different passes.  */
2520 		 random bits in expressionS's.  */
2531 	         SEG_OP expression in a VIT_OPCODE_SYNTHETIC
2645 			  as_warn (_("Bignum not permitted in short literal. Immediate mode assumed."));
2709 	         If vop_short == 's' then a short floating literal is in the
2715 	         Also, just in case width is byte word or long, we copy the lowest
2735   /* Remember where it is, in case we want to modify the op-code later.  */
2897 			  /* To reverse the condition in a VAX branch,
3062 			     be in the correct bit position of VAX
3109 			         turn out to be in the same segment as
3148 			  /* gcc 2.6.3 is known to generate these in at least
3172 			      as_warn (_("Symbol %s used as immediate operand in PIC mode."),
3197 				     in the right order.  We stored
3330 	      as_bad (_("Illegal operands: Only %%r_%s%d allowed in %d-byte data fields"),
3338 		  as_bad (_("Illegal operands: %%r_%s%d requires arguments in ()"),
3369 		as_bad (_("Illegal operands: %%r_%s%d requires arguments in ()"),
3378 		      as_bad (_("Illegal operands: %%r_%s%d requires arguments in ()"),