diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 51b9ffe60e25c286dab5cb0cce80573981f0f2df..b7d482308e07d7301f21b93da16b70f4c1ff42ae 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2003-07-06  Art Haas  <ahaas@airmail.net>
+
+	* f/global.c (ffeglobal_type_string_): Fix obsolete GCC array
+	initializer syntax.
+
 2003-07-06  James E Wilson  <wilson@tuliptree.org>
 
 	PR optimization/9812
diff --git a/gcc/f/global.c b/gcc/f/global.c
index f175f1e6d0fc1035b8869926f37ed30c65f40d6f..f6c23cdc7687ea0b2d8920d553a2e7a4adf6bb3d 100644
--- a/gcc/f/global.c
+++ b/gcc/f/global.c
@@ -62,14 +62,14 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 static ffenameSpace ffeglobal_filewide_ = NULL;
 static const char *const ffeglobal_type_string_[] =
 {
-  [FFEGLOBAL_typeNONE] "??",
-  [FFEGLOBAL_typeMAIN] "main program",
-  [FFEGLOBAL_typeEXT] "external",
-  [FFEGLOBAL_typeSUBR] "subroutine",
-  [FFEGLOBAL_typeFUNC] "function",
-  [FFEGLOBAL_typeBDATA] "block data",
-  [FFEGLOBAL_typeCOMMON] "common block",
-  [FFEGLOBAL_typeANY] "?any?"
+  [FFEGLOBAL_typeNONE] = "??",
+  [FFEGLOBAL_typeMAIN] = "main program",
+  [FFEGLOBAL_typeEXT] = "external",
+  [FFEGLOBAL_typeSUBR] = "subroutine",
+  [FFEGLOBAL_typeFUNC] = "function",
+  [FFEGLOBAL_typeBDATA] = "block data",
+  [FFEGLOBAL_typeCOMMON] = "common block",
+  [FFEGLOBAL_typeANY] = "?any?"
 };
 #endif