re PR fortran/31608 (wrong types in character array/scalar binop)

2007-11-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR fortran/31608
	*gfortran.dg/char_cast_1.f90: Modify regex in scan-tree-dump-times
	to match known variations in symbol format. Document in comments.

From-SVN: r130173
This commit is contained in:
Jerry DeLisle 2007-11-14 01:35:09 +00:00
parent 68c2aa7d95
commit 3865fa6a9d
2 changed files with 9 additions and 2 deletions

View File

@ -1,3 +1,9 @@
2007-11-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/31608
*gfortran.dg/char_cast_1.f90: Modify regex in scan-tree-dump-times
to match known variations in symbol format. Document in comments.
2007-11-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/33985

View File

@ -26,6 +26,7 @@
end function Upper
end
! The sign that all is well is that [S.5][1] appears twice.
! { dg-final { scan-tree-dump-times "\\\[S\.5\\\]\\\[1\\\]" 2 "original" } }
! { dg-final { cleanup-tree-dump "original" } }
! Platform dependent variations are [S$5][1], [__S_5][1], [S___5][1]
! With this regular expression we also find [S.15][1], so count is 3.
! { dg-final { scan-tree-dump-times "5\\\]\\\[1\\\]" 3 "original" } }
! { dg-final { cleanup-tree-dump "original" } }