Remove some dead code in gdb.fortran/info-types.exp
authorTom Tromey <tom@tromey.com>
Wed, 25 Jan 2023 16:37:25 +0000 (09:37 -0700)
committerTom Tromey <tom@tromey.com>
Fri, 27 Jan 2023 01:28:31 +0000 (18:28 -0700)
An early "return" in this test case prevents a test from running.
This seems to have been intentional and has been in place since:

commit d57cbee932f86df06251498daa93154046dc77c0
Author: Andrew Burgess <andrew.burgess@embecosm.com>
Date:   Tue Dec 3 13:18:43 2019 +0000

    gdb/testsuite/fortran: Fix info-modules/info-types for gfortran 8+

This patch removes the dead code.

gdb/testsuite/gdb.fortran/info-types.exp

index 98fb812dd8bbcfaee9235f210c4af276f4c3bfea..8cd9a2ae6cb54367b257edfe91b1fa3e6debd091 100644 (file)
@@ -61,20 +61,3 @@ if { [test_compiler_info {gfortran-*} f90] } {
     setup_xfail *-*-* gcc/105454
     GDBInfoSymbols::check_entry "${srcfile}" "41" "Type s1;"
 }
-
-return 0
-
-gdb_test "info types" \
-    [multi_line \
-        "All defined types:" \
-        "" \
-        "File .*:" \
-        "\[\t \]+${character1}" \
-        "\[\t \]+${integer4}" \
-        "(\[\t \]+${integer8}" \
-        ")?\[\t \]+${logical4}" \
-        "(35:\[\t \]+Type __vtype_mod1_M1t1;" \
-        ")?$decimal:\[\t \]+Type m1t1;" \
-        "\[\t \]+${real4}" \
-        "41:\[\t \]+Type s1;(" \
-        ".*)?"]