* g77.f-torture/compile/200005018.f: New test.

[pf3gnuchains/gcc-fork.git] / gcc / c-lex.c

diff --git a/gcc/c-lex.c b/gcc/c-lex.c
index 8498e5f..3ca8264 100644 (file)
--- a/gcc/c-lex.c
+++ b/gcc/c-lex.c
@@ -222,9 +222,9 @@ remember_protocol_qualifiers ()
       wordlist[i].name = "oneway";
 }
 \f
-char *
+const char *
 init_parse (filename)
-     char *filename;
+     const char *filename;
 {
 #if !USE_CPPLIB
   /* Open input file.  */