------- Comment #4 from burnus at gcc dot gnu dot org  2008-01-21 23:26 -------
I wonder whether the following makes sense; I think it does, but it does not
seem to fix the problem :-(

Index: decl.c
===================================================================
--- decl.c      (Revision 131702)
+++ decl.c      (Arbeitskopie)
@@ -1593,6 +1593,7 @@ variable_decl (int elem)
          sym->ts.derived = current_ts.derived;
          sym->ts.is_c_interop = current_ts.is_c_interop;
          sym->ts.is_iso_c = current_ts.is_iso_c;
+         sym->ts.f90_type = current_ts.f90_type;
          m = MATCH_YES;

          /* Check to see if we have an array specification.  */


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2008-01-21 23:26:50
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34907

Reply via email to