summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>2012-06-22 07:18:50 +0000
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>2012-06-22 07:18:50 +0000
commit53c763aad716ff89d1e12f0315f9bf22d037b1b1 (patch)
tree3aa69431ae858929b93fe2cf13ec8d13e2ceb468
parent25db41e923efb9076dc5de0743b898186cebbcc0 (diff)
downloadgcc-53c763aad716ff89d1e12f0315f9bf22d037b1b1.tar.gz
PR debug/53704
* dwarf2out.c (gen_compile_unit_die): Use DW_LANG_Fortran90 as language for GNU Fortran if in strict DWARF2 mode. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@188874 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r--gcc/ChangeLog6
-rw-r--r--gcc/dwarf2out.c3
2 files changed, 9 insertions, 0 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 8326b55101a..1b32a583d49 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,11 @@
2012-06-22 Eric Botcazou <ebotcazou@adacore.com>
+ PR debug/53704
+ * dwarf2out.c (gen_compile_unit_die): Use DW_LANG_Fortran90 as language
+ for GNU Fortran if in strict DWARF2 mode.
+
+2012-06-22 Eric Botcazou <ebotcazou@adacore.com>
+
* tree-ssa-live.c (remove_unused_scope_block_p): Remove again
DECL_IGNORED_P non-reg vars even if they are used.
diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c
index 2b9971f1857..282a0e507c8 100644
--- a/gcc/dwarf2out.c
+++ b/gcc/dwarf2out.c
@@ -18220,6 +18220,9 @@ gen_compile_unit_die (const char *filename)
language = DW_LANG_Go;
}
}
+ /* Use a degraded Fortran setting in strict DWARF2 so is_fortran works. */
+ else if (strcmp (language_string, "GNU Fortran") == 0)
+ language = DW_LANG_Fortran90;
add_AT_unsigned (die, DW_AT_language, language);