re PR ada/6558 (Wrongly reverted patches)

        PR ada/6558
        * misc.c: Unrevert misc.c (1.13)

From-SVN: r58636

gcc/ada/ChangeLog

+2002-10-29  Geert bosch  <bosch@gnat.com>
+        PR ada/6558
+        * misc.c: Unrevert misc.c (1.13)
+
 2002-10-28  Nathanael Nerode  <neroden@gcc.gnu.org>
 
 	* a-chlat9.ads a-cwila9.ads a-dynpri.adb a-retide.adb: Update

gcc/ada/misc.c

@@ -209,7 +209,7 @@ gnat_parse_file (set_yydebug)
    it cannot decode. This routine returns 1 if it is successful, otherwise
    it returns 0. */
 
-int
+static int
 gnat_decode_option (argc, argv)
      int argc ATTRIBUTE_UNUSED;
      char **argv;
@@ -276,7 +276,7 @@ gnat_decode_option (argc, argv)
 
 /* Initialize for option processing.  */
 
-void
+static void
 gnat_init_options ()
 {
   /* Initialize gnat_argv with save_argv size */
@@ -339,6 +339,10 @@ gnat_init (filename)
   internal_reference_types ();
 
   set_lang_adjust_rli (gnat_adjust_rli);
+
+  if (filename == 0)
+    filename = "";
+
   return filename;
 }