gas/config/tc-ns32k.c

29 #define IIF_ENTRIES 13		/* Number of entries in iif.  */
37     iif.iifP[ptr].type = a1;				\
38     iif.iifP[ptr].size = c1;				\
39     iif.iifP[ptr].object = e1;				\
40     iif.iifP[ptr].object_adjust = g1;			\
41     iif.iifP[ptr].pcrel = i1;				\
42     iif.iifP[ptr].pcrel_adjust = k1;			\
43     iif.iifP[ptr].im_disp = m1;				\
44     iif.iifP[ptr].relax_substate = o1;			\
45     iif.iifP[ptr].bit_fixP = q1;			\
46     iif.iifP[ptr].addr_mode = s1;			\
47     iif.iifP[ptr].bsr = u1;
123 				   iif-entry.  */
133 struct int_ins_form iif;
138    0	total length in bytes of entries in iif
899 /* Convert operands to iif-format and adds bitfields to the opcode.
903    Be careful not to put to objects in the same iif-slot.  */
966 		       iif.instr_size,
977 	  iif.iifP[1].object |= ((long) addr_modeP.mode) << opcode_bit_ptr;
998 	  iif.instr_size += suffixP[i] ? suffixP[i] : 4;
1005 	  iif.instr_size += suffixP[i] ? suffixP[i] : 4;
1017 	  iif.iifP[1].object |= tmp << opcode_bit_ptr;
1022 	  iif.iifP[1].object |= tmp << 15;
1027 	  iif.iifP[1].object |= tmp << 15; /* Insert the regtype in opcode.  */
1032 	  iif.iifP[1].object |= tmp << 15;
1040 	      optlist (argv[i], opt1, &iif.iifP[10].object);
1043 	      optlist (argv[i], opt2, &iif.iifP[10].object);
1046 	  iif.instr_size += 1;
1051 	  iif.iifP[1].object |= tmp << opcode_bit_ptr;
1056 	  iif.iifP[1].object |= tmp << opcode_bit_ptr;
1059 	  iif.instr_size += 1;	/* 1 byte is allocated after the opcode.  */
1074 	  iif.instr_size += 1;
1090 /* Build iif of one assembly text line.  */
1236     iif.iifP[i].type = 0;
1238   /* Build opcode iif-entry.  */
1239   iif.instr_size = desc->opcode_size / 8;
1240   IIF (1, 1, iif.instr_size, desc->opcode_seed, 0, 0, 0, 0, 0, 0, -1, 0);
1242   /* This call encodes operands to iif format.  */
1598 /* Convert iif to fragments.  From this point we start to dribble with
1600    possible to make an iif for an other CPU, you don't need to know
1603    cpu-instruction to iif-format (takes some work) and adopt the other
1604    md_? parts according to given instructions Note that iif was
1636   frag_grow (iif.instr_size);	/* This is important.  */
1644       if ((type = iif.iifP[i].type))
1647 	  switch (size = iif.iifP[i].size)
1652 	      if (iif.iifP[i].bit_fixP->fx_bit_base)
1654 		iif.iifP[i].bit_fixP->fx_bit_base = (long) inst_opcode;
1664 	      j = iif.iifP[i].bit_fixP;
1672 		  else if (iif.iifP[i].pcrel)
1677 				   iif.iifP[i].object,
1678 				   iif.iifP[i].pcrel,
1679 				   iif.iifP[i].im_disp,
1681 				   iif.iifP[i].bsr,	/* Sequent hack.  */
1686 		      switch (iif.iifP[i].im_disp)
1689 			  md_number_to_chars (memP, iif.iifP[i].object, size);
1692 			  md_number_to_disp (memP, iif.iifP[i].object, size);
1695 			  as_fatal (_("iif convert internal pcrel/binary"));
1704 		  evaluate_expr (&exprP, (char *) iif.iifP[i].object);
1759 		      iif.iifP[i].pcrel)
1764 		      exprP.X_add_number += iif.iifP[i].object_adjust;
1769 					 iif.iifP[i].pcrel,
1770 					 iif.iifP[i].im_disp,
1772 					 iif.iifP[i].bsr,
1780 		      switch (iif.iifP[i].im_disp)
1789 			  as_fatal (_("iif convert internal pcrel/pointer"));
1794 		  as_fatal (_("Internal logic error in iif.iifP[n].type"));
1805 		evaluate_expr (&exprP, (char *) iif.iifP[i].object);
1808 		    !iif.iifP[i].pcrel)
1817 				       0, /* never iif.iifP[i].pcrel, */
1818 				       1, /* always iif.iifP[i].im_disp */
1850 			  frag_bsr (old_frag) = iif.iifP[i].bsr;
1884 	      as_fatal (_("Internal logic error in iif.iifP[].type"));
1895   parse (line, 0);		/* Explode line to more fix form in iif.  */
1896   convert_iif ();		/* Convert iif to frags, fix's etc.  */