Commit 5d8c54a7 by Tobias Burnus Committed by Tobias Burnus

assumed_rank_12.f90: Update dg-error.

2012-07-20  Tobias Burnus  <burnus@net-b.de>

        * gfortran.dg/assumed_rank_12.f90: Update dg-error.

From-SVN: r189725
parent ad05f87b
2012-07-20 Tobias Burnus <burnus@net-b.de>
* gfortran.dg/assumed_rank_12.f90: Update dg-error.
2012-07-20 Jason Merrill <jason@redhat.com>
PR c++/54038
......
......@@ -16,6 +16,6 @@ function f() result(res)
end function f
end
! { dg-final { scan-tree-dump " = f \\(\\);.*desc.0.dtype = 600;.*desc.0.data = .void .. D.*;.*sub \\(&desc.0\\);.*D.*= .integer.kind=4. .. desc.0.data;" "original" } }
! { dg-final { scan-tree-dump " = f \\(\\);.*desc.0.dtype = .*;.*desc.0.data = .void .. D.*;.*sub \\(&desc.0\\);.*D.*= .integer.kind=4. .. desc.0.data;" "original" } }
! { dg-final { cleanup-tree-dump "original" } }
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