aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.fortran
diff options
context:
space:
mode:
authorJan Kratochvil <jan.kratochvil@redhat.com>2010-06-02 23:01:01 +0000
committerJan Kratochvil <jan.kratochvil@redhat.com>2010-06-02 23:01:01 +0000
commitfd5700c7c6ec3220529d2164e6dc6bfb35a23146 (patch)
tree7c87213e4c7d53800cfa75acf2ec85b2abdbfa3d /gdb/testsuite/gdb.fortran
parentf55ee35cf17f1eb104292b4c6b2f7def38ffe4a8 (diff)
downloadgdb-fd5700c7c6ec3220529d2164e6dc6bfb35a23146.zip
gdb-fd5700c7c6ec3220529d2164e6dc6bfb35a23146.tar.gz
gdb-fd5700c7c6ec3220529d2164e6dc6bfb35a23146.tar.bz2
gdb/
* symfile.c (init_filename_language_table): New extensions .for, .FOR, .ftn, .FTN, .fpp, .FPP, .f90, .F90, .f95, .F95, .f03, .F03, .f08 and .F08. gdb/testsuite/ * gdb.fortran/module.exp (stopped language detection): New test.
Diffstat (limited to 'gdb/testsuite/gdb.fortran')
-rw-r--r--gdb/testsuite/gdb.fortran/module.exp6
1 files changed, 6 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.fortran/module.exp b/gdb/testsuite/gdb.fortran/module.exp
index 4042b26..fabf660 100644
--- a/gdb/testsuite/gdb.fortran/module.exp
+++ b/gdb/testsuite/gdb.fortran/module.exp
@@ -20,6 +20,12 @@ if { [prepare_for_testing $testfile.exp $testfile $srcfile {debug f77}] } {
return -1
}
+# Test automatic language detection before the inferior starts. It tests the
+# effect of expected:
+# (gdb) show language
+# The current source language is "auto; currently fortran".
+gdb_test "p modmany::var_i" " = 14" "stopped language detection"
+
if ![runto MAIN__] then {
perror "couldn't run to breakpoint MAIN__"
continue