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

             Bug #: 54474
           Summary: [4.8 Regression]: gfortran.dg/coarray_poly_3.f90
    Classification: Unclassified
           Product: gcc
           Version: 4.7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassig...@gcc.gnu.org
        ReportedBy: h...@gcc.gnu.org
                CC: bur...@gcc.gnu.org
              Host: x86_64-unknown-linux-gnu
            Target: cris-axis-elf


This test previously passed, now it fails.
A patch in the revision range (last_known_working:first_known_failing)
190839:190877 exposed or caused this regression.  Since then it fails as
follows:

Running /tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/dg.exp ...
...
FAIL: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 6)
FAIL: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 12)
FAIL: gfortran.dg/coarray_poly_3.f90  -O  (test for excess errors)


In gfortran.log:

Executing on host:
/tmp/hpautotest-gcc0/cris-elf/gccobj/gcc/testsuite/gfortran/../../gfortran
-B/tmp/hpautotest-gcc0/cris-elf/gccobj/gcc/testsuite/gfortran/../../
-B/tmp/hpautotest-gcc0/cris-elf/gccobj/cris-elf/./libgfortran/
/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90 
-fno-diagnostics-show-caret   -O  -fcoarray=single -S   -isystem
/tmp/hpautotest-gcc0/cris-elf/gccobj/cris-elf/./newlib/targ-include -isystem
/tmp/hpautotest-gcc0/gcc/newlib/libc/include  -o coarray_poly_3.s    (timeout =
300)
/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:6.18:



subroutine cont1(x) ! { dg-error "has the CONTIGUOUS attribute but is not an ar

                  1

Error: 'x' at (1) has the CONTIGUOUS attribute but is not an array pointer or
an assumed-shape or assumed-rank array

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:12.18:



subroutine cont2(x) ! { dg-error "has the CONTIGUOUS attribute but is not an ar

                  1

Error: 'x' at (1) has the CONTIGUOUS attribute but is not an array pointer or
an assumed-shape or assumed-rank array

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:25:



function func() ! { dg-error "shall not be a coarray or have a coarray componen

1

Error: Function result 'func' at (1) shall not be a coarray or have a coarray
component

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:31:



function func2() ! { dg-error "must be dummy, allocatable or pointer" }

1

Error: CLASS variable 'func2' at (1) must be dummy, allocatable or pointer

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:35.20:



  class(t) :: func2a ! { dg-error "CLASS variable 'func2a' at .1. must be dummy

                    1

Error: CLASS variable 'func2a' at (1) must be dummy, allocatable or pointer

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:39.18:



subroutine foo1(x1) ! { dg-error "Coarray variable 'x1' at .1. shall not have c

                  1

Error: Coarray variable 'x1' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:45.18:



subroutine foo2(x2) ! { dg-error "Coarray variable 'x2' at .1. shall not have c

                  1

Error: Coarray variable 'x2' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:54.18:



subroutine foo3(x1) ! { dg-error "Coarray variable 'x1' at .1. shall not have c

                  1

Error: Coarray variable 'x1' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:60.18:



subroutine foo4(x2) ! { dg-error "Coarray variable 'x2' at .1. shall not have c

                  1

Error: Coarray variable 'x2' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:69.18:



subroutine bar1(y1) ! { dg-error "Allocatable coarray variable 'y1' at .1. must

                  1

Error: Allocatable coarray variable 'y1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:75.18:



subroutine bar2(y2) ! { dg-error "Allocatable coarray variable 'y2' at .1. must

                  1

Error: Allocatable coarray variable 'y2' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:81.18:



subroutine bar3(z1) ! { dg-error "Allocatable coarray variable 'z1' at .1. must

                  1

Error: Allocatable coarray variable 'z1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:87.18:



subroutine bar4(z2) ! { dg-error "Allocatable array 'z2' at .1. must have a def

                  1

Error: Allocatable array 'z2' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:93.18:



subroutine bar5(z3) ! { dg-error "Array pointer 'z3' at .1. must have a deferre

                  1

Error: Array pointer 'z3' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:104.19:



subroutine bar1c(y1) ! { dg-error "Allocatable coarray variable 'y1' at .1. mus

                   1

Error: Allocatable coarray variable 'y1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:110.19:



subroutine bar2c(y2) ! { dg-error "Allocatable coarray variable 'y2' at .1. mus

                   1

Error: Allocatable coarray variable 'y2' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:116.19:



subroutine bar3c(z1) ! { dg-error "Allocatable coarray variable 'z1' at .1. mus

                   1

Error: Allocatable coarray variable 'z1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:122.19:



subroutine bar4c(z2) ! { dg-error "Allocatable array 'z2' at .1. must have a de

                   1

Error: Allocatable array 'z2' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:128.19:



subroutine bar5c(z3) ! { dg-error "Array pointer 'z3' at .1. must have a deferr

                   1

Error: Array pointer 'z3' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:162.21:



  subroutine inter2(x) ! { dg-error "must have a deferred shape" }

                     1

Error: Array pointer 'x' at (1) must have a deferred shape or assumed rank

compiler exited with status 1
output is:
/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:6.18:



subroutine cont1(x) ! { dg-error "has the CONTIGUOUS attribute but is not an ar

                  1

Error: 'x' at (1) has the CONTIGUOUS attribute but is not an array pointer or
an assumed-shape or assumed-rank array

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:12.18:



subroutine cont2(x) ! { dg-error "has the CONTIGUOUS attribute but is not an ar

                  1

Error: 'x' at (1) has the CONTIGUOUS attribute but is not an array pointer or
an assumed-shape or assumed-rank array

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:25:



function func() ! { dg-error "shall not be a coarray or have a coarray componen

1

Error: Function result 'func' at (1) shall not be a coarray or have a coarray
component

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:31:



function func2() ! { dg-error "must be dummy, allocatable or pointer" }

1

Error: CLASS variable 'func2' at (1) must be dummy, allocatable or pointer

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:35.20:



  class(t) :: func2a ! { dg-error "CLASS variable 'func2a' at .1. must be dummy

                    1

Error: CLASS variable 'func2a' at (1) must be dummy, allocatable or pointer

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:39.18:



subroutine foo1(x1) ! { dg-error "Coarray variable 'x1' at .1. shall not have c

                  1

Error: Coarray variable 'x1' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:45.18:



subroutine foo2(x2) ! { dg-error "Coarray variable 'x2' at .1. shall not have c

                  1

Error: Coarray variable 'x2' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:54.18:



subroutine foo3(x1) ! { dg-error "Coarray variable 'x1' at .1. shall not have c

                  1

Error: Coarray variable 'x1' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:60.18:



subroutine foo4(x2) ! { dg-error "Coarray variable 'x2' at .1. shall not have c

                  1

Error: Coarray variable 'x2' at (1) shall not have codimensions with deferred
shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:69.18:



subroutine bar1(y1) ! { dg-error "Allocatable coarray variable 'y1' at .1. must

                  1

Error: Allocatable coarray variable 'y1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:75.18:



subroutine bar2(y2) ! { dg-error "Allocatable coarray variable 'y2' at .1. must

                  1

Error: Allocatable coarray variable 'y2' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:81.18:



subroutine bar3(z1) ! { dg-error "Allocatable coarray variable 'z1' at .1. must

                  1

Error: Allocatable coarray variable 'z1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:87.18:



subroutine bar4(z2) ! { dg-error "Allocatable array 'z2' at .1. must have a def

                  1

Error: Allocatable array 'z2' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:93.18:



subroutine bar5(z3) ! { dg-error "Array pointer 'z3' at .1. must have a deferre

                  1

Error: Array pointer 'z3' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:104.19:



subroutine bar1c(y1) ! { dg-error "Allocatable coarray variable 'y1' at .1. mus

                   1

Error: Allocatable coarray variable 'y1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:110.19:



subroutine bar2c(y2) ! { dg-error "Allocatable coarray variable 'y2' at .1. mus

                   1

Error: Allocatable coarray variable 'y2' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:116.19:



subroutine bar3c(z1) ! { dg-error "Allocatable coarray variable 'z1' at .1. mus

                   1

Error: Allocatable coarray variable 'z1' at (1) must have deferred shape

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:122.19:



subroutine bar4c(z2) ! { dg-error "Allocatable array 'z2' at .1. must have a de

                   1

Error: Allocatable array 'z2' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:128.19:



subroutine bar5c(z3) ! { dg-error "Array pointer 'z3' at .1. must have a deferr

                   1

Error: Array pointer 'z3' at (1) must have a deferred shape or assumed rank

/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:162.21:



  subroutine inter2(x) ! { dg-error "must have a deferred shape" }

                     1

Error: Array pointer 'x' at (1) must have a deferred shape or assumed rank


FAIL: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 6)
FAIL: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 12)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 25)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 31)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 35)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 39)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 45)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 54)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 60)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 69)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 75)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 81)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 87)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 93)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 104)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 110)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 116)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 122)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 128)
PASS: gfortran.dg/coarray_poly_3.f90  -O   (test for errors, line 162)
FAIL: gfortran.dg/coarray_poly_3.f90  -O  (test for excess errors)
Excess errors:
/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:6:18:
Error: 'x' at (1) has the CONTIGUOUS attribute but is not an array pointer or
an assumed-shape or assumed-rank array
/tmp/hpautotest-gcc0/gcc/gcc/testsuite/gfortran.dg/coarray_poly_3.f90:12:18:
Error: 'x' at (1) has the CONTIGUOUS attribute but is not an array pointer or
an assumed-shape or assumed-rank array

It looks like a testsuite update goof, but I can't be sure.  Messages on
gcc-testresults@ indicate the regression is general.

Author of related patches in revision range CC:ed.

Reply via email to