[Bug fortran/43412] New: [OOP] BT_CLASS does not does not set array spec

[burnus at gcc dot gnu dot org]

symbol.c's gfc_build_class_symbol has:

  (*as) = NULL;  /* XXX */


Thus the following invalid program is accepted as the check for
"Assumed size array at %L must be a dummy argument" fails as sym->as == NULL.


module m
  type t
  end type t
end module m
subroutine foo()
use m
  class(t), pointer :: y(*) ! <<< invalid
end


-- 
           Summary: [OOP] BT_CLASS does not does not set array spec
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Keywords: rejects-valid, accepts-invalid
          Severity: major
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org
OtherBugsDependingO 18918
             nThis:


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