darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2025-02-21 18:11:31 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

PR testsuite/12040:

Browse Source 
* gdb.fortran/array-element.exp: Use f90, not f77.
	* gdb.fortran/complex.exp: Use f90, not f77.
	* gdb.fortran/derived-type.exp: Use f90, not f77.
	* gdb.fortran/library-module.exp: Use f90, not f77.
	* gdb.fortran/logical.exp: Use f90, not f77.
	* gdb.fortran/module.exp: Use f90, not f77.
	* gdb.fortran/multi-dim.exp: Use f90, not f77.
	* gdb.fortran/subarray.exp: Use f90, not f77.
This commit is contained in:
Tom Tromey 2011-06-29 17:50:47 +00:00
parent 39c4d40aa5
commit 0ecee54cfd
9 changed files with 22 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,15 @@
2011-06-29 Tom Tromey <tromey@redhat.com>
PR testsuite/12040:
* gdb.fortran/array-element.exp: Use f90, not f77.
* gdb.fortran/complex.exp: Use f90, not f77.
* gdb.fortran/derived-type.exp: Use f90, not f77.
* gdb.fortran/library-module.exp: Use f90, not f77.
* gdb.fortran/logical.exp: Use f90, not f77.
* gdb.fortran/module.exp: Use f90, not f77.
* gdb.fortran/multi-dim.exp: Use f90, not f77.
* gdb.fortran/subarray.exp: Use f90, not f77.
2011-06-29 Tom Tromey <tromey@redhat.com>
* gdb.fortran/charset.exp: New file.

2
gdb/testsuite/gdb.fortran/array-element.exp
View File

@ -29,7 +29,7 @@ set srcfile ${testfile}.f
set binfile ${objdir}/${subdir}/${testfile}
if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable {debug f77}] != ""} {
executable {debug f90}] != ""} {
return -1
}

2
gdb/testsuite/gdb.fortran/complex.exp
View File

@ -18,7 +18,7 @@ set srcfile ${testfile}.f
set binfile ${objdir}/${subdir}/${testfile}
if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable {debug f77 quiet}] != "" } {
executable {debug f90 quiet}] != "" } {
untested "Couldn't compile ${srcfile}"
return -1
}

2
gdb/testsuite/gdb.fortran/derived-type.exp
View File

@ -29,7 +29,7 @@ set srcfile ${testfile}.f90
set binfile ${objdir}/${subdir}/${testfile}
if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable {debug f77}] != ""} {
executable {debug f90}] != ""} {
return -1
}

4
gdb/testsuite/gdb.fortran/library-module.exp
View File

@ -25,7 +25,7 @@ if [get_compiler_info not-used] {
return -1
}
if { [gdb_compile_shlib "${srcdir}/${subdir}/${srclibfile}" $objdir/$subdir/$libfile {debug f77}] != "" } {
if { [gdb_compile_shlib "${srcdir}/${subdir}/${srclibfile}" $objdir/$subdir/$libfile {debug f90}] != "" } {
untested "Couldn't compile ${srclibfile}"
return -1
}
@ -34,7 +34,7 @@ if { [gdb_compile_shlib "${srcdir}/${subdir}/${srclibfile}" $objdir/$subdir/$li
# just for the linking phase (and not the source compilation phase). And any
# warnings on ignored $libfile abort the process.
if { [gdb_compile [list $srcdir/$subdir/$srcfile $objdir/$subdir/$libfile] $objdir/$subdir/$binfile executable {debug f77}] != "" } {
if { [gdb_compile [list $srcdir/$subdir/$srcfile $objdir/$subdir/$libfile] $objdir/$subdir/$binfile executable {debug f90}] != "" } {
untested "Couldn't compile ${srcfile}"
return -1
}

4
gdb/testsuite/gdb.fortran/logical.exp
View File

@ -2,7 +2,7 @@
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
@ -19,7 +19,7 @@
set test "logical"
set srcfile ${test}.f90
if { [prepare_for_testing "${test}.exp" "${test}" "${srcfile}" {debug f77 quiet}] } {
if { [prepare_for_testing "${test}.exp" "${test}" "${srcfile}" {debug f90 quiet}] } {
untested "Could not compile ${srcfile}."
return -1
}

2
gdb/testsuite/gdb.fortran/module.exp
View File

@ -16,7 +16,7 @@
set testfile "module"
set srcfile ${testfile}.f90
if { [prepare_for_testing $testfile.exp $testfile $srcfile {debug f77}] } {
if { [prepare_for_testing $testfile.exp $testfile $srcfile {debug f90}] } {
return -1
}

2
gdb/testsuite/gdb.fortran/multi-dim.exp
View File

@ -20,7 +20,7 @@ if { [skip_fortran_tests] } { return -1 }
set testfile "multi-dim"
set srcfile ${testfile}.f90
if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} {debug f77}] } {
if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} {debug f90}] } {
return -1
}

2
gdb/testsuite/gdb.fortran/subarray.exp
View File

@ -29,7 +29,7 @@ set srcfile ${testfile}.f
set binfile ${objdir}/${subdir}/${testfile}
if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
executable {debug f77}] != ""} {
executable {debug f90}] != ""} {
return -1
}