[Bug fortran/29343] New: (Regression) Error on valid specification variables in same call to ALLOCATE

["pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

See: 
http://gcc.gnu.org/ml/fortran/2006-10/msg00086.html

Hi!
This patch causes compilation failure on SPEC cpu2000/facerec.


Below is the minimal reproducer:
        Subroutine ReadParameters (Album)
        Implicit NONE


        Type GalleryP
                Integer       :: NoOfEntries
                Character(80), Pointer :: FileName (:)
        End Type GalleryP


        Type(GalleryP), Intent(Out) :: Album
        Allocate (Album%FileName   (Album%NoOfEntries))
        end


Error message:
 In file small2.f90:10

Allocate (Album%FileName (Album%NoOfEntries))
1
Error: 'album' must not appear an the array specification at (1) in the same
ALLOCATE statement where it is itself allocated

This is caused by my patch for PR20779 and PR20891, which was just submitted.

Thanks

Paul


-- 
           Summary: (Regression) Error on valid specification variables in
                    same call to ALLOCATE
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: pault at gcc dot gnu dot org
        ReportedBy: pault at gcc dot gnu dot org


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