[vms/committed]: do not generate dummy fixes in gas/config/tc-alpha.c

[vms/committed]: do not generate dummy fixes in gas/config/tc-alpha.c

[Tristan Gingold]

Hi,

dummy fixes were generated for the sake of add_to_link_pool.  But this is not necessary and simply eat resources.
This patch simply remove the generation of these useless fixes.

Tristan.

gas/
2011-06-28  Tristan Gingold  <gingold@adacore.com>

	* config/tc-alpha.c (s_alpha_pdesc): Fix indentation. Do not
	generate dummy fix.

Index: config/tc-alpha.c
===================================================================
RCS file: /cvs/src/src/gas/config/tc-alpha.c,v
retrieving revision 1.94
diff -c -r1.94 tc-alpha.c
*** config/tc-alpha.c	28 Jun 2011 09:23:53 -0000	1.94
--- config/tc-alpha.c	28 Jun 2011 13:26:48 -0000
***************
*** 4590,4608 ****
    /* Signature offset.  */
    md_number_to_chars (p + 6, (valueT) 0, 2);
  
!   fix_new_exp (frag_now, p - frag_now->fr_literal+8, 8, &exp, 0, BFD_RELOC_64);
  
    if (alpha_evax_proc->pdsckind == PDSC_S_K_KIND_NULL)
      return;
  
-   /* Add dummy fix to make add_to_link_pool work.  */
-   p = frag_more (6);
-   fixp = fix_new (frag_now, p - frag_now->fr_literal, 6, 0, 0, 0, 0);
-   fixp->fx_done = 1;
-   
    /* pdesc+16: Size.  */
    md_number_to_chars (p, (valueT) alpha_evax_proc->framesize, 4);
- 
    md_number_to_chars (p + 4, (valueT) 0, 2);
  
    /* Entry length.  */
--- 4590,4604 ----
    /* Signature offset.  */
    md_number_to_chars (p + 6, (valueT) 0, 2);
  
!   fix_new_exp (frag_now, p - frag_now->fr_literal + 8,
!                8, &exp, 0, BFD_RELOC_64);
  
    if (alpha_evax_proc->pdsckind == PDSC_S_K_KIND_NULL)
      return;
  
    /* pdesc+16: Size.  */
+   p = frag_more (6);
    md_number_to_chars (p, (valueT) alpha_evax_proc->framesize, 4);
    md_number_to_chars (p + 4, (valueT) 0, 2);
  
    /* Entry length.  */
***************
*** 4614,4626 ****
    if (alpha_evax_proc->pdsckind == PDSC_S_K_KIND_FP_REGISTER)
      return;
  
-   /* Add dummy fix to make add_to_link_pool work.  */
-   p = frag_more (8);
-   fixp = fix_new (frag_now, p - frag_now->fr_literal, 8, 0, 0, 0, 0);
-   fixp->fx_done = 1;
- 
    /* pdesc+24: register masks.  */
! 
    md_number_to_chars (p, alpha_evax_proc->imask, 4);
    md_number_to_chars (p + 4, alpha_evax_proc->fmask, 4);
  
--- 4610,4617 ----
    if (alpha_evax_proc->pdsckind == PDSC_S_K_KIND_FP_REGISTER)
      return;
  
    /* pdesc+24: register masks.  */
!   p = frag_more (8);
    md_number_to_chars (p, alpha_evax_proc->imask, 4);
    md_number_to_chars (p + 4, alpha_evax_proc->fmask, 4);
  
***************
*** 4633,4642 ****
  
    if (alpha_evax_proc->handler_data)
      {
-       /* Add dummy fix to make add_to_link_pool work.  */
        p = frag_more (8);
-       fixp = fix_new (frag_now, p - frag_now->fr_literal, 8, 0, 0, 0, 0);
-       fixp->fx_done = 1;
        md_number_to_chars (p, alpha_evax_proc->handler_data, 8);
      }
  }
--- 4624,4630 ----