Aix4.1 warning fixes installed

["Kaveh R. Ghazi" <ghazi at caip dot rutgers dot edu>]

This patch fixes a few warnings on Aix4.1.

The format specifier for ASM_GENERATE_INTERNAL_LABEL got passed int
and sometimes long (never HOST_WIDE_INT) so I made it always cast to
long and use %ld.  The rest are "obvious" types.

Bootstrapped on powerpc-ibm-aix4.1.4.0 and installed.

		--Kaveh


2000-07-04  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>

	* rs6000/aix.h (ASM_GENERATE_INTERNAL_LABEL): Fix format specifier.

	* xcoffout.c (assign_type_number): Constify.
	(xcoffout_source_file): Add static prototype.  Don't needlessly
	cast away const-ness.
	
diff -rup orig/egcs-CVS20000511/gcc/config/rs6000/aix.h egcs-CVS20000511/gcc/config/rs6000/aix.h
--- orig/egcs-CVS20000511/gcc/config/rs6000/aix.h	Tue Mar 28 23:42:27 2000
+++ egcs-CVS20000511/gcc/config/rs6000/aix.h	Fri May 12 11:25:20 2000
@@ -462,7 +462,7 @@ toc_section ()						\
    This is suitable for output with `assemble_name'.  */
 
 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)	\
-  sprintf (LABEL, "*%s..%d", PREFIX, NUM)
+  sprintf (LABEL, "*%s..%ld", (PREFIX), (long)(NUM))
 
 /* This is how to output an assembler line to define N characters starting
    at P to FILE.  */
diff -rup orig/egcs-CVS20000511/gcc/xcoffout.c egcs-CVS20000511/gcc/xcoffout.c
--- orig/egcs-CVS20000511/gcc/xcoffout.c	Mon May  8 20:09:52 2000
+++ egcs-CVS20000511/gcc/xcoffout.c	Fri May 12 11:11:37 2000
@@ -117,8 +117,9 @@ const char *xcoff_lastfile;
 #define ASM_OUTPUT_LBE(FILE,LINENUM,BLOCKNUM) \
   fprintf (FILE, "\t.eb\t%d\n", ABS_OR_RELATIVE_LINENO (LINENUM))
 
-static void assign_type_number		PARAMS ((tree, char *, int));
+static void assign_type_number		PARAMS ((tree, const char *, int));
 static void xcoffout_block		PARAMS ((tree, int, tree));
+static void xcoffout_source_file	PARAMS ((FILE *, const char *, int));
 
 /* Support routines for XCOFF debugging info.  */
 
@@ -128,7 +129,7 @@ static void xcoffout_block		PARAMS ((tre
 static void
 assign_type_number (syms, name, number)
      tree syms;
-     char *name;
+     const char *name;
      int number;
 {
   tree decl;
@@ -326,7 +327,7 @@ stab_to_sclass (stab)
 /* Output debugging info to FILE to switch to sourcefile FILENAME.
    INLINE_P is true if this is from an inlined function.  */
 
-void
+static void
 xcoffout_source_file (file, filename, inline_p)
      FILE *file;
      const char *filename;
@@ -462,19 +463,19 @@ xcoffout_declare_function (file, decl, n
      tree decl;
      const char *name;
 {
-  char *n = (char *) name;
   int i;
 
-  if (*n == '*')
-    n++;
+  if (*name == '*')
+    name++;
   else
     for (i = 0; name[i]; ++i)
       {
 	if (name[i] == '[')
 	  {
-	    n = (char *) alloca (i + 1);
+	    char *n = (char *) alloca (i + 1);
 	    strncpy (n, name, i);
 	    n[i] = '\0';
+	    name = n;
 	    break;
 	  }
       }
@@ -487,7 +488,8 @@ xcoffout_declare_function (file, decl, n
 
   /* .function NAME, TOP, MAPPING, TYPE, SIZE
      16 and 044 are placeholders for backwards compatibility */
-  fprintf (file, "\t.function .%s,.%s,16,044,FE..%s-.%s\n", n, n, n, n);
+  fprintf (file, "\t.function .%s,.%s,16,044,FE..%s-.%s\n",
+	   name, name, name, name);
 }
 
 /* Called at beginning of function body (after prologue).