Add skip_fortran_tests to two Fortran testcases

This commit adds missing skip_fortran_tests checks to two Fortran
testcases that did not have it.  It also fixes a copy-paste error
in a comment.

gdb/testsuite/ChangeLog:

	* gdb.mi/mi-fortran-modules.exp: Check skip_fortran_tests.
	* gdb.mi/mi-vla-fortran.exp: Likewise.  Also fix a comment.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 8635d17e11af7cafd9c8adbb33fc953ba4b15eaa..6f92df87a6464e1b96644c005f0104ba6bde591a 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2020-10-27  Gary Benson <gbenson@redhat.com>
+
+       * gdb.mi/mi-fortran-modules.exp: Check skip_fortran_tests.
+       * gdb.mi/mi-vla-fortran.exp: Likewise.  Also fix a comment.
+
 2020-10-27  Tankut Baris Aktemur  <tankut.baris.aktemur@intel.com>
 
        * gdb.base/condbreak.exp: Update the completion tests to

diff --git a/gdb/testsuite/gdb.mi/mi-fortran-modules.exp b/gdb/testsuite/gdb.mi/mi-fortran-modules.exp
index de5657d2823b675904719af8a7c6fcb79318a90f..ae6cbd77fdf829fa3f7fcc2bba0369368d9ee722 100644 (file)
--- a/gdb/testsuite/gdb.mi/mi-fortran-modules.exp
+++ b/gdb/testsuite/gdb.mi/mi-fortran-modules.exp
@@ -15,6 +15,8 @@
 
 # Test -symbol-info-modules, listing Fortran modules.
 
+if { [skip_fortran_tests] } { return -1 }
+
 load_lib fortran.exp
 load_lib mi-support.exp
 set MIFLAGS "-i=mi"

diff --git a/gdb/testsuite/gdb.mi/mi-vla-fortran.exp b/gdb/testsuite/gdb.mi/mi-vla-fortran.exp
index e862725f48deb251083048b2ecb56aa1992d9b2b..a62ec0f9f7fec76912de229d9f12edc99969f551 100644 (file)
--- a/gdb/testsuite/gdb.mi/mi-vla-fortran.exp
+++ b/gdb/testsuite/gdb.mi/mi-vla-fortran.exp
@@ -13,8 +13,10 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-# Verify that, using the MI, we can evaluate a simple C Variable Length
-# Array (VLA).
+# Verify that, using the MI, we can evaluate a simple Fortran Variable
+# Length Array (VLA).
+
+if { [skip_fortran_tests] } { return -1 }
 
 load_lib mi-support.exp
 load_lib fortran.exp