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.
This commit is contained in:
parent
f55ee35cf1
commit
fd5700c7c6
@ -1,3 +1,9 @@
|
||||
2010-06-02 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
|
||||
* symfile.c (init_filename_language_table): New extensions .for, .FOR,
|
||||
.ftn, .FTN, .fpp, .FPP, .f90, .F90, .f95, .F95, .f03, .F03, .f08 and
|
||||
.F08.
|
||||
|
||||
2010-06-02 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
|
||||
Support DW_TAG_module as separate namespaces.
|
||||
|
@ -2633,6 +2633,20 @@ init_filename_language_table (void)
|
||||
add_filename_language (".m", language_objc);
|
||||
add_filename_language (".f", language_fortran);
|
||||
add_filename_language (".F", language_fortran);
|
||||
add_filename_language (".for", language_fortran);
|
||||
add_filename_language (".FOR", language_fortran);
|
||||
add_filename_language (".ftn", language_fortran);
|
||||
add_filename_language (".FTN", language_fortran);
|
||||
add_filename_language (".fpp", language_fortran);
|
||||
add_filename_language (".FPP", language_fortran);
|
||||
add_filename_language (".f90", language_fortran);
|
||||
add_filename_language (".F90", language_fortran);
|
||||
add_filename_language (".f95", language_fortran);
|
||||
add_filename_language (".F95", language_fortran);
|
||||
add_filename_language (".f03", language_fortran);
|
||||
add_filename_language (".F03", language_fortran);
|
||||
add_filename_language (".f08", language_fortran);
|
||||
add_filename_language (".F08", language_fortran);
|
||||
add_filename_language (".s", language_asm);
|
||||
add_filename_language (".sx", language_asm);
|
||||
add_filename_language (".S", language_asm);
|
||||
|
@ -1,3 +1,7 @@
|
||||
2010-06-02 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
|
||||
* gdb.fortran/module.exp (stopped language detection): New test.
|
||||
|
||||
2010-06-02 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
|
||||
Support DW_TAG_module as separate namespaces.
|
||||
|
@ -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
|
||||
|
Loading…
x
Reference in New Issue
Block a user