[testsuite, Fortran] Apply DejaGnu 1.4.4 work-around also to 'gfortran.dg/coarray/caf.exp:dg-compile-aux-modules'

See trunk r215293.  This unifies all 'dg-compile-aux-modules' instances.

	gcc/testsuite/
	PR fortran/56408
	* gfortran.dg/coarray/caf.exp (dg-compile-aux-modules): Workaround
	missing nexted dg-test call support in dejaGNU 1.4.4.

From-SVN: r269848
This commit is contained in:
Thomas Schwinge 2019-03-21 20:16:29 +01:00 committed by Thomas Schwinge
parent bcb68daa54
commit 4c1595d236
2 changed files with 15 additions and 1 deletions

View File

@ -1,5 +1,9 @@
2019-03-21 Thomas Schwinge <thomas@codesourcery.com>
PR fortran/56408
* gfortran.dg/coarray/caf.exp (dg-compile-aux-modules): Workaround
missing nexted dg-test call support in dejaGNU 1.4.4.
PR fortran/29383
* gfortran.dg/ieee/ieee.exp (DEFAULT_FFLAGS): Set the same as in
other '*.exp' files.

View File

@ -54,8 +54,18 @@ proc dg-compile-aux-modules { args } {
error "dg-set-target-env-var: needs one argument"
return
}
set level [info level]
if { [info procs dg-save-unknown] != [list] } {
rename dg-save-unknown dg-save-unknown-level-$level
}
dg-test $gfortran_test_path/[lindex $args 1] "" $gfortran_aux_module_flags
# cleanup-modules isn't intentionally invoked here.
# cleanup-modules is intentionally not invoked here.
if { [info procs dg-save-unknown-level-$level] != [list] } {
rename dg-save-unknown-level-$level dg-save-unknown
}
}
# Add -latomic only where supported. Assume built-in support elsewhere.