Skip to content

R
riscv-gcc-1
Commit 00155043 by Paul Thomas
Options

same_type_as_1.f03: Correct for improved message. 

2012-12-20  Paul Thomas  <pault@gcc.gnu.org>

	* gfortran.dg/same_type_as_1.f03: Correct for improved message.

From-SVN: r194639
parent 3cecbdfa
Showing with 4 additions and 4 deletions
gcc/testsuite/ChangeLog
......@@ -18,7 +18,7 @@
* gfortran.dg/unlimited_polymorphic_1.f03: New test.
* gfortran.dg/unlimited_polymorphic_2.f03: New test.
* gfortran.dg/unlimited_polymorphic_3.f03: New test.
* gfortran.dg/same_type_as.f03: Correct for improved message.
* gfortran.dg/same_type_as_1.f03: Correct for improved message.
2012-12-19 Kyrylo Tkachov <kyrylo.tkachov@arm.com>
......
gcc/testsuite/gfortran.dg/same_type_as_1.f03
......@@ -6,7 +6,7 @@
type :: t1
integer :: i
end type
end type
type :: ts
sequence
......@@ -18,10 +18,10 @@
integer :: i
print *, SAME_TYPE_AS (i,x1) ! { dg-error "must be of a derived type" }
print *, SAME_TYPE_AS (i,x1) ! { dg-error "cannot be of type INTEGER" }
print *, SAME_TYPE_AS (x1,x2) ! { dg-error "must be of an extensible type" }
print *, EXTENDS_TYPE_OF (i,x1) ! { dg-error "must be of a derived type" }
print *, EXTENDS_TYPE_OF (i,x1) ! { dg-error "cannot be of type INTEGER" }
print *, EXTENDS_TYPE_OF (x1,x2) ! { dg-error "must be of an extensible type" }
end
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment