[Bug fortran/55756] New: [4.8 regression] FAIL: gfortran.dg/same_type_as_1.f03 -O (test for excess errors)

[schwab@linux-m68k.org]

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

             Bug #: 55756
           Summary: [4.8 regression] FAIL: gfortran.dg/same_type_as_1.f03
                    -O  (test for excess errors)
    Classification: Unclassified
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: schwab@linux-m68k.org


spawn
/daten/aranym/gcc/gcc-20121220/Build/gcc/testsuite/gfortran/../../gfortran
-B/daten/aranym/gcc/gcc-20121220/Build/gcc/testsuite/gfortran/../../
-B/daten/aranym/gcc/gcc-20121220/Build/m68k-linux/./libgfortran/
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03
-fno-diagnostics-show-caret -O -pedantic-errors -S -o same_type_as_1.s

output is:
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03:21.24:

 print *, SAME_TYPE_AS (i,x1)   ! { dg-error "must be of a derived type" }
                        1
Error: 'a' argument of 'same_type_as' intrinsic at (1) cannot be of type
INTEGER(4)
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03:22.27:

 print *, SAME_TYPE_AS (x1,x2)  ! { dg-error "must be of an extensible type" }
                           1
Error: 'b' argument of 'same_type_as' intrinsic at (1) must be of an extensible
type
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03:24.27:

 print *, EXTENDS_TYPE_OF (i,x1)   ! { dg-error "must be of a derived type" }
                           1
Error: 'a' argument of 'extends_type_of' intrinsic at (1) cannot be of type
INTEGER(4)
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03:25.30:

 print *, EXTENDS_TYPE_OF (x1,x2)  ! { dg-error "must be of an extensible type"
                              1
Error: 'mold' argument of 'extends_type_of' intrinsic at (1) must be of an
extensible type

FAIL: gfortran.dg/same_type_as_1.f03  -O   (test for errors, line 21)
PASS: gfortran.dg/same_type_as_1.f03  -O   (test for errors, line 22)
FAIL: gfortran.dg/same_type_as_1.f03  -O   (test for errors, line 24)
PASS: gfortran.dg/same_type_as_1.f03  -O   (test for errors, line 25)
FAIL: gfortran.dg/same_type_as_1.f03  -O  (test for excess errors)
Excess errors:
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03:21:24:
Error: 'a' argument of 'same_type_as' intrinsic at (1) cannot be of type
INTEGER(4)
/daten/aranym/gcc/gcc-20121220/gcc/testsuite/gfortran.dg/same_type_as_1.f03:24:27:
Error: 'a' argument of 'extends_type_of' intrinsic at (1) cannot be of type
INTEGER(4)