binutils/gas/dwarf2dbg.c

194 static struct frag *first_frag_for_seg (segT);
195 static struct frag *last_frag_for_seg (segT);
702 static struct frag *
708 static struct frag *
780 get_frag_fix (fragS *frag, segT seg)
784   if (frag->fr_next)
785     return frag->fr_fix;
791     if (fr->frch_last == frag)
792       return (char *) obstack_next_free (&fr->frch_obstack) - frag->fr_literal;
1040 /* Generate a variant frag that we can use to relax address/line
1054   /* The maximum size of the frag is the line delta with a maximum
1062 /* The function estimates the size of a rs_dwarf2dbg variant frag
1067 dwarf2dbg_estimate_size_before_relax (fragS *frag)
1072   addr_delta = resolve_symbol_value (frag->fr_symbol);
1073   size = size_inc_line_addr (frag->fr_offset, addr_delta);
1075   frag->fr_subtype = size;
1080 /* This function relaxes a rs_dwarf2dbg variant frag based on the
1082    of the frag.  This returns the change in frag length.  */
1085 dwarf2dbg_relax_frag (fragS *frag)
1089   old_size = frag->fr_subtype;
1090   new_size = dwarf2dbg_estimate_size_before_relax (frag);
1095 /* This function converts a rs_dwarf2dbg variant frag into a normal
1096    fill frag.  This is called after all relaxation has been done.
1097    fr_subtype will be the desired length of the frag.  */
1100 dwarf2dbg_convert_frag (fragS *frag)
1104   addr_diff = resolve_symbol_value (frag->fr_symbol);
1109   assert (frag->fr_var >= (int) frag->fr_subtype);
1111   emit_inc_line_addr (frag->fr_offset, addr_diff,
1112 		      frag->fr_literal + frag->fr_fix, frag->fr_subtype);
1114   frag->fr_fix += frag->fr_subtype;
1115   frag->fr_type = rs_fill;
1116   frag->fr_var = 0;
1117   frag->fr_offset = 0;
1131   fragS *last_frag = NULL, *frag;
1182       frag = symbol_get_frag (lab);
1192       else if (frag == last_frag)
1199       last_frag = frag;
1209   frag = last_frag_for_seg (seg);
1210   frag_ofs = get_frag_fix (frag, seg);
1213       lab = symbol_temp_new (seg, frag_ofs, frag);
1216   else if (frag == last_frag)
1220       lab = symbol_temp_new (seg, frag_ofs, frag);
1377       fragS *frag;
1380       frag = first_frag_for_seg (s->seg);
1381       beg = symbol_temp_new (s->seg, 0, frag);
1384       frag = last_frag_for_seg (s->seg);
1385       end = symbol_temp_new (s->seg, get_frag_fix (frag, s->seg), frag);
1453       fragS *frag;
1456       frag = first_frag_for_seg (s->seg);
1457       beg = symbol_temp_new (s->seg, 0, frag);
1460       frag = last_frag_for_seg (s->seg);
1461       end = symbol_temp_new (s->seg, get_frag_fix (frag, s->seg), frag);