if (abfd->xvec->header_byteorder_big_p != false)
if (bfd_header_big_endian (abfd))
MY_swap_std_reloc_out (abfd, g, natptr)     bfd *abfd;     arelent *g;     struct reloc_std_external *natptr;{  int r_index;  asymbol *sym = *(g->sym_ptr_ptr);  int r_extern;  int r_length;  int r_pcrel;  int r_neg = 0;	/* Negative relocs use the BASEREL bit.  */  asection *output_section = sym->section->output_section;  PUT_WORD(abfd, g->address, natptr->r_address);  r_length = g->howto->size ;   /* Size as a power of two */  if (r_length < 0)    {      r_length = -r_length;      r_neg = 1;    }  r_pcrel  = (int) g->howto->pc_relative; /* Relative to PC? */  /* For RISC iX, in pc-relative relocs the r_pcrel bit means that the     relocation has been done already (Only for the 26-bit one I think)???!!!     */  if (g->howto->type == 3)    {      r_length = 3;      r_pcrel = 0;    }  else if (g->howto->type == 7)    {       r_length = 3;      r_pcrel = 1;    }  #if 0  /* For a standard reloc, the addend is in the object file.  */  r_addend = g->addend + (*(g->sym_ptr_ptr))->section->output_section->vma;#endif  /* name was clobbered by aout_write_syms to be symbol index */  /* If this relocation is relative to a symbol then set the     r_index to the symbols index, and the r_extern bit.     Absolute symbols can come in in two ways, either as an offset     from the abs section, or as a symbol which has an abs value.     check for that here     */  if (bfd_is_com_section (output_section)      || output_section == &bfd_abs_section      || output_section == &bfd_und_section)    {      if (bfd_abs_section.symbol == sym)	{	  /* Whoops, looked like an abs symbol, but is really an offset	     from the abs section */	  r_index = 0;	  r_extern = 0;	}      else	{	  /* Fill in symbol */	  r_extern = 1;	  r_index =  stoi((*(g->sym_ptr_ptr))->flags);	}    }  else    {      /* Just an ordinary section */      r_extern = 0;      r_index  = output_section->target_index;    }  /* now the fun stuff */  if (abfd->xvec->header_byteorder_big_p != false)    {      natptr->r_index[0] = r_index >> 16;      natptr->r_index[1] = r_index >> 8;      natptr->r_index[2] = r_index;      natptr->r_type[0] =	(  (r_extern ?   RELOC_STD_BITS_EXTERN_BIG: 0)	 | (r_pcrel  ?   RELOC_STD_BITS_PCREL_BIG: 0)	 | (r_neg    ?   RELOC_ARM_BITS_NEG_BIG: 0)	 | (r_length <<  RELOC_STD_BITS_LENGTH_SH_BIG));    }  else    {      natptr->r_index[2] = r_index >> 16;      natptr->r_index[1] = r_index >> 8;      natptr->r_index[0] = r_index;      natptr->r_type[0] =	(  (r_extern ?   RELOC_STD_BITS_EXTERN_LITTLE: 0)	 | (r_pcrel  ?   RELOC_STD_BITS_PCREL_LITTLE: 0)	 | (r_neg    ?   RELOC_ARM_BITS_NEG_LITTLE: 0)	 | (r_length <<  RELOC_STD_BITS_LENGTH_SH_LITTLE));    }}