------- Comment #2 from pault at gcc dot gnu dot org  2006-10-07 22:37 -------
This addition in resolve.c(resolve_fl_derived):5541

      if (c->ts.type == BT_DERIVED && c->pointer
            && c->ts.derived->components == NULL)
        {
          gfc_error ("The pointer component '%s' of '%s' at %L is a type "
                     "that has not been declared", c->name, sym->name,
                     &c->loc);
          return FAILURE;
        }

does the trick.

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2006-10-06 12:32:55         |2006-10-07 22:37:14
               date|                            |


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

Reply via email to