This is the mail archive of the
binutils-cvs@sourceware.org
mailing list for the binutils project.
[binutils-gdb] Recognize new DWARF5/GCC5 DW_LANG constants for Fortran 03 and Fortran 08.
- From: Mark Wielaard <mark at sourceware dot org>
- To: bfd-cvs at sourceware dot org
- Date: 10 Feb 2015 08:10:01 -0000
- Subject: [binutils-gdb] Recognize new DWARF5/GCC5 DW_LANG constants for Fortran 03 and Fortran 08.
https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=5a19504458d7a4113ef91875a447f4e841df7598
commit 5a19504458d7a4113ef91875a447f4e841df7598
Author: Mark Wielaard <mjw@redhat.com>
Date: Mon Feb 9 23:36:54 2015 +0100
Recognize new DWARF5/GCC5 DW_LANG constants for Fortran 03 and Fortran 08.
DWARFv5 defines and GCC5 may output two new DW_LANG constants for the
Fortran 2003 and Fortran 2008 standards. Handle and display both in
binutils.
binutils/ChangeLog:
* dwarf.c (read_and_display_attr_value): Handle DW_LANG_Fortran03
and DW_LANG_Fortran08.
include/ChangeLog:
* dwarf2.h: Add DW_LANG_Fortran03 and DW_LANG_Fortran08.
http://dwarfstd.org/ShowIssue.php?issue=141121.1
Diff:
---
binutils/ChangeLog | 5 +++++
binutils/dwarf.c | 2 ++
include/ChangeLog | 4 ++++
include/dwarf2.h | 2 ++
4 files changed, 13 insertions(+)
diff --git a/binutils/ChangeLog b/binutils/ChangeLog
index 803bfa8..01c4634 100644
--- a/binutils/ChangeLog
+++ b/binutils/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-09 Mark Wielaard <mjw@redhat.com>
+
+ * dwarf.c (read_and_display_attr_value): Handle DW_LANG_Fortran03
+ and DW_LANG_Fortran08.
+
2015-02-06 Nick Clifton <nickc@redhat.com>
PR binutils/17512
diff --git a/binutils/dwarf.c b/binutils/dwarf.c
index cebd8c9..e93a757 100644
--- a/binutils/dwarf.c
+++ b/binutils/dwarf.c
@@ -1951,6 +1951,8 @@ read_and_display_attr_value (unsigned long attribute,
case DW_LANG_C_plus_plus_11: printf ("(C++11)"); break;
case DW_LANG_C11: printf ("(C11)"); break;
case DW_LANG_C_plus_plus_14: printf ("(C++14)"); break;
+ case DW_LANG_Fortran03: printf ("(Fortran 03)"); break;
+ case DW_LANG_Fortran08: printf ("(Fortran 08)"); break;
/* MIPS extension. */
case DW_LANG_Mips_Assembler: printf ("(MIPS assembler)"); break;
/* UPC extension. */
diff --git a/include/ChangeLog b/include/ChangeLog
index 4004997..24a141d 100644
--- a/include/ChangeLog
+++ b/include/ChangeLog
@@ -1,5 +1,9 @@
2015-02-09 Mark Wielaard <mjw@redhat.com>
+ * dwarf2.h: Add DW_LANG_Fortran03 and DW_LANG_Fortran08.
+
+2015-02-09 Mark Wielaard <mjw@redhat.com>
+
* dwarf2.def: Add DW_TAG_atomic_type.
2015-01-28 James Bowman <james.bowman@ftdichip.com>
diff --git a/include/dwarf2.h b/include/dwarf2.h
index 791ef56..4ada871 100644
--- a/include/dwarf2.h
+++ b/include/dwarf2.h
@@ -310,6 +310,8 @@ enum dwarf_source_language
DW_LANG_C_plus_plus_11 = 0x001a, /* dwarf5.20141029.pdf DRAFT */
DW_LANG_C11 = 0x001d,
DW_LANG_C_plus_plus_14 = 0x0021,
+ DW_LANG_Fortran03 = 0x0022,
+ DW_LANG_Fortran08 = 0x0023,
DW_LANG_lo_user = 0x8000, /* Implementation-defined range start. */
DW_LANG_hi_user = 0xffff, /* Implementation-defined range start. */