gprof vs -fno-common

[Richard Henderson <rth at redhat dot com>]

Build with -fno-common failed because indirectchild was defined
in both vax.c and tahoe.c.  Fixed up some other symbols that 
didn't need to be public at the same time.


r~


        * i386.c (i386_iscall): Static.
        * tahoe.c (indirectchild, tahoe_operandmode): Static.
        (tahoe_operandlength, tahoe_reladdr): Static.
        * vax.c (indirectchild): Static.

Index: i386.c
===================================================================
RCS file: /cvs/src/src/gprof/i386.c,v
retrieving revision 1.5
diff -c -p -d -r1.5 i386.c
*** i386.c	2001/08/09 14:57:42	1.5
--- i386.c	2002/01/27 02:41:36
***************
*** 22,31 ****
  #include "hist.h"
  #include "symtab.h"
  
! int i386_iscall PARAMS ((unsigned char *));
  void i386_find_call PARAMS ((Sym *, bfd_vma, bfd_vma));
  
! int
  i386_iscall (ip)
       unsigned char *ip;
  {
--- 22,31 ----
  #include "hist.h"
  #include "symtab.h"
  
! static int i386_iscall PARAMS ((unsigned char *));
  void i386_find_call PARAMS ((Sym *, bfd_vma, bfd_vma));
  
! static int
  i386_iscall (ip)
       unsigned char *ip;
  {
Index: tahoe.c
===================================================================
RCS file: /cvs/src/src/gprof/tahoe.c,v
retrieving revision 1.5
diff -c -p -d -r1.5 tahoe.c
*** tahoe.c	2001/08/09 14:57:42	1.5
--- tahoe.c	2002/01/27 02:41:36
*************** typedef enum tahoe_opermodes tahoe_opera
*** 44,58 ****
  /*
   * A symbol to be the child of indirect callf:
   */
! Sym indirectchild;
  
! tahoe_operandenum tahoe_operandmode PARAMS ((unsigned char *));
! char *tahoe_operandname PARAMS ((tahoe_operandenum));
! long tahoe_operandlength PARAMS ((unsigned char *));
! bfd_vma tahoe_reladdr PARAMS ((char *));
  void tahoe_find_call PARAMS ((Sym *, bfd_vma, bfd_vma));
  
! tahoe_operandenum
  tahoe_operandmode (modep)
       unsigned char *modep;
  {
--- 44,58 ----
  /*
   * A symbol to be the child of indirect callf:
   */
! static Sym indirectchild;
  
! static tahoe_operandenum tahoe_operandmode PARAMS ((unsigned char *));
! static char *tahoe_operandname PARAMS ((tahoe_operandenum));
! static long tahoe_operandlength PARAMS ((unsigned char *));
! static bfd_vma tahoe_reladdr PARAMS ((char *));
  void tahoe_find_call PARAMS ((Sym *, bfd_vma, bfd_vma));
  
! static tahoe_operandenum
  tahoe_operandmode (modep)
       unsigned char *modep;
  {
*************** tahoe_operandmode (modep)
*** 94,100 ****
    abort ();
  }
  
! char *
  tahoe_operandname (mode)
       tahoe_operandenum mode;
  {
--- 94,100 ----
    abort ();
  }
  
! static char *
  tahoe_operandname (mode)
       tahoe_operandenum mode;
  {
*************** tahoe_operandname (mode)
*** 148,154 ****
    abort ();
  }
  
! long
  tahoe_operandlength (modep)
       unsigned char *modep;
  {
--- 148,154 ----
    abort ();
  }
  
! static long
  tahoe_operandlength (modep)
       unsigned char *modep;
  {
*************** tahoe_operandlength (modep)
*** 186,192 ****
    abort ();
  }
  
! bfd_vma
  tahoe_reladdr (modep)
       char *modep;
  {
--- 186,192 ----
    abort ();
  }
  
! static bfd_vma
  tahoe_reladdr (modep)
       char *modep;
  {
Index: vax.c
===================================================================
RCS file: /cvs/src/src/gprof/vax.c,v
retrieving revision 1.5
diff -c -p -d -r1.5 vax.c
*** vax.c	2001/08/09 14:57:42	1.5
--- vax.c	2002/01/27 02:41:36
*************** struct modebyte
*** 50,57 ****
  /*
   * A symbol to be the child of indirect calls:
   */
! Sym indirectchild;
! 
  
  static operandenum vax_operandmode PARAMS ((struct modebyte *));
  static char *vax_operandname PARAMS ((operandenum));
--- 50,56 ----
  /*
   * A symbol to be the child of indirect calls:
   */
! static Sym indirectchild;
  
  static operandenum vax_operandmode PARAMS ((struct modebyte *));
  static char *vax_operandname PARAMS ((operandenum));