From: Joern Rennecke <amylaar@spamcop.net>
Date: Wed, 20 Jan 2010 05:39:12 +0000 (+0000)
Subject: module.c (mio_f2k_derived): Use enumerator as initializer of enum variable.
X-Git-Tag: upstream/12.2.0~95005
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=e80b7e74ee01e83fd8493fe288de2a8a79c99abc;p=platform%2Fupstream%2Fgcc.git

module.c (mio_f2k_derived): Use enumerator as initializer of enum variable.

	* module.c (mio_f2k_derived): Use enumerator as initializer of
	enum variable.

From-SVN: r156055
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 1c29ff4..d3909e9 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2010-01-20  Joern Rennecke  <amylaar@spamcop.net>
+
+	* module.c (mio_f2k_derived): Use enumerator as initializer of
+	enum variable.
+
 2010-01-19  Janus Weil  <janus@gcc.gnu.org>
 
 	PR fortran/42804
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c
index 13c9b82..c72cac1 100644
--- a/gcc/fortran/module.c
+++ b/gcc/fortran/module.c
@@ -3474,7 +3474,7 @@ mio_f2k_derived (gfc_namespace *f2k)
   else
     while (peek_atom () != ATOM_RPAREN)
       {
-	gfc_intrinsic_op op = 0; /* Silence GCC.  */
+	gfc_intrinsic_op op = GFC_INTRINSIC_BEGIN; /* Silence GCC.  */
 
 	mio_lparen ();
 	mio_intrinsic_op (&op);