gas/config/tc-alpha.c

82   unsigned insn;
339 /* Symbol labelling the current insn.  When the Alpha gas sees
858 	      /* Only support one relocation op per insn.  */
859 	      as_bad (_("More than one relocation op per insn"));
1105    the insn, but do not emit it.
1108    than one insn in an insn structure.  */
1114 			 struct alpha_insn *insn)
1126 	  assemble_insn (opcode, tok, ntok, insn, BFD_RELOC_UNUSED);
1191   struct alpha_insn insn;
1235 	assemble_tokens_to_insn ("ldq", newtok, 3, &insn);
1237 	assert (insn.nfixups == 1);
1238 	insn.fixups[0].reloc = BFD_RELOC_ALPHA_LITERAL;
1239 	insn.sequence = emit_lituse = next_sequence_num--;
1271 	assemble_tokens_to_insn ("ldq", newtok, 3, &insn);
1273 	assert (insn.nfixups == 1);
1274 	insn.fixups[0].reloc = BFD_RELOC_ALPHA_ELF_LITERAL;
1275 	insn.sequence = emit_lituse = next_sequence_num--;
1289 		assemble_tokens_to_insn ("lda", newtok, 3, &insn);
1297 		assemble_tokens_to_insn ("lda", newtok, 3, &insn);
1315 	    assemble_tokens_to_insn ("ldq", newtok, 3, &insn);
1319 	emit_insn (&insn);
1420       assemble_tokens_to_insn ("ldq", newtok, 3, &insn);
1422       assert (insn.nfixups == 1);
1424       insn.fixups[0].reloc = BFD_RELOC_ALPHA_LITERAL;
1427       insn.fixups[0].reloc = BFD_RELOC_ALPHA_ELF_LITERAL;
1429       insn.sequence = seq_num;
1431       emit_insn (&insn);
1438       assemble_tokens_to_insn ("ldq", newtok, 3, &insn);
1440       assert (insn.nfixups < MAX_INSN_FIXUPS);
1441       insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BASE;
1442       insn.fixups[insn.nfixups].exp.X_op = O_absent;
1443       insn.nfixups++;
1444       insn.sequence = seq_num;
1447       emit_insn (&insn);
1596 emit_insn (struct alpha_insn *insn)
1610   md_number_to_chars (f, insn->insn, 4);
1617   for (i = 0; i < insn->nfixups; ++i)
1620       struct alpha_fixup *fixup = &insn->fixups[i];
1679 	  info = get_alpha_reloc_tag (insn->sequence);
1681 	    as_bad (_("too many ldah insns for !gpdisp!%ld"), insn->sequence);
1684 		    insn->sequence);
1691 	  info = get_alpha_reloc_tag (insn->sequence);
1693 	    as_bad (_("too many lda insns for !gpdisp!%ld"), insn->sequence);
1696 		    insn->sequence);
1705 	  if (insn->sequence == 0)
1707 	  info = get_alpha_reloc_tag (insn->sequence);
1741 	  info = get_alpha_reloc_tag (insn->sequence);
1750 		        insn->sequence);
1753 		        insn->sequence);
1765 	  if (insn->sequence == 0)
1767 	  info = get_alpha_reloc_tag (insn->sequence);
1769 	    as_bad (_("duplicate !tlsgd!%ld"), insn->sequence);
1772 		    insn->sequence);
1781 	  if (insn->sequence == 0)
1783 	  info = get_alpha_reloc_tag (insn->sequence);
1785 	    as_bad (_("duplicate !tlsldm!%ld"), insn->sequence);
1788 		    insn->sequence);
1808 insert_operand (unsigned insn,
1837       insn = (*operand->insert) (insn, val, &errmsg);
1842     insn |= ((val & ((1 << operand->bits) - 1)) << operand->shift);
1844   return insn;
1854 	       struct alpha_insn *insn,
1863   memset (insn, 0, sizeof (*insn));
1925 	  /* There is one special case for which an insn receives two
1932 	      if (insn->nfixups >= MAX_INSN_FIXUPS)
1935 	      fixup = &insn->fixups[insn->nfixups++];
1956       if (insn->nfixups >= MAX_INSN_FIXUPS)
1985       fixup = &insn->fixups[insn->nfixups++];
1993   insn->insn = image;
2008   struct alpha_insn insn;
2021   assemble_tokens_to_insn ((const char *) opname, newtok, 3, &insn);
2025       assert (insn.nfixups < MAX_INSN_FIXUPS);
2026       insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BASE;
2027       insn.fixups[insn.nfixups].exp.X_op = O_absent;
2028       insn.nfixups++;
2029       insn.sequence = lituse;
2032   emit_insn (&insn);
2046   struct alpha_insn insn;
2069   assemble_tokens_to_insn ((const char *) opname, newtok, 3, &insn);
2073       assert (insn.nfixups < MAX_INSN_FIXUPS);
2074       insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BASE;
2075       insn.fixups[insn.nfixups].exp.X_op = O_absent;
2076       insn.nfixups++;
2077       insn.sequence = lituse;
2080   emit_insn (&insn);
2095       struct alpha_insn insn;
2115       assemble_tokens_to_insn ("ldq_u", newtok, 3, &insn);
2119 	  assert (insn.nfixups < MAX_INSN_FIXUPS);
2120 	  insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BASE;
2121 	  insn.fixups[insn.nfixups].exp.X_op = O_absent;
2122 	  insn.nfixups++;
2123 	  insn.sequence = lituse;
2126       emit_insn (&insn);
2131       assemble_tokens_to_insn (extXl_op[(long) vlgsize], newtok, 3, &insn);
2135 	  assert (insn.nfixups < MAX_INSN_FIXUPS);
2136 	  insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BYTOFF;
2137 	  insn.fixups[insn.nfixups].exp.X_op = O_absent;
2138 	  insn.nfixups++;
2139 	  insn.sequence = lituse;
2142       emit_insn (&insn);
2247       struct alpha_insn insn;
2267       assemble_tokens_to_insn ("ldq_u", newtok, 3, &insn);
2271 	  assert (insn.nfixups < MAX_INSN_FIXUPS);
2272 	  insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BASE;
2273 	  insn.fixups[insn.nfixups].exp.X_op = O_absent;
2274 	  insn.nfixups++;
2275 	  insn.sequence = lituse;
2278       emit_insn (&insn);
2284       assemble_tokens_to_insn (insXl_op[lgsize], newtok, 3, &insn);
2288 	  assert (insn.nfixups < MAX_INSN_FIXUPS);
2289 	  insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BYTOFF;
2290 	  insn.fixups[insn.nfixups].exp.X_op = O_absent;
2291 	  insn.nfixups++;
2292 	  insn.sequence = lituse;
2295       emit_insn (&insn);
2300       assemble_tokens_to_insn (mskXl_op[lgsize], newtok, 3, &insn);
2304 	  assert (insn.nfixups < MAX_INSN_FIXUPS);
2305 	  insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BYTOFF;
2306 	  insn.fixups[insn.nfixups].exp.X_op = O_absent;
2307 	  insn.nfixups++;
2308 	  insn.sequence = lituse;
2311       emit_insn (&insn);
2320       assemble_tokens_to_insn ("stq_u", newtok, 3, &insn);
2324 	  assert (insn.nfixups < MAX_INSN_FIXUPS);
2325 	  insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_BASE;
2326 	  insn.fixups[insn.nfixups].exp.X_op = O_absent;
2327 	  insn.nfixups++;
2328 	  insn.sequence = lituse;
2331       emit_insn (&insn);
2650   struct alpha_insn insn;
2686   assemble_tokens_to_insn (opname, newtok, 3, &insn);
2690       assert (insn.nfixups < MAX_INSN_FIXUPS);
2691       insn.fixups[insn.nfixups].reloc = DUMMY_RELOC_LITUSE_JSR;
2692       insn.fixups[insn.nfixups].exp.X_op = O_absent;
2693       insn.nfixups++;
2694       insn.sequence = lituse;
2697   emit_insn (&insn);
2748   struct alpha_insn insn;
2761   assemble_tokens_to_insn ("ldah", newtok, 3, &insn);
2772   insn.nfixups = 1;
2773   insn.fixups[0].exp = addend;
2774   insn.fixups[0].reloc = BFD_RELOC_ALPHA_GPDISP_HI16;
2775   insn.sequence = next_sequence_num;
2777   emit_insn (&insn);
2781   assemble_tokens_to_insn ("lda", newtok, 3, &insn);
2787   insn.nfixups = 1;
2788   insn.fixups[0].exp = addend;
2789   insn.fixups[0].reloc = BFD_RELOC_ALPHA_GPDISP_LO16;
2790   insn.sequence = next_sequence_num--;
2792   emit_insn (&insn);
3131 	  struct alpha_insn insn;
3132 	  assemble_insn (opcode, tok, ntok, &insn, reloc);
3136 	    insn.sequence = tok[ntok].X_add_number;
3138 	  emit_insn (&insn);