diff options
| author | kenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-04-14 21:12:45 +0000 |
|---|---|---|
| committer | kenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-04-14 21:12:45 +0000 |
| commit | 7f2ad96e6f202c2b8883ed62af1ae5ef2768d106 (patch) | |
| tree | 61e4d892d97c67628a8b0c2ca6540afb2b5201c3 | |
| parent | d3221b32dbca41d885d4397ec6c14f52f8b02bdb (diff) | |
| download | gcc-7f2ad96e6f202c2b8883ed62af1ae5ef2768d106.tar.gz | |
* dwarf2out.c (gen_compile_unit_die): Emit DW_LANG_Ada95 instead
of DW_LANG_Ada83 for Ada units.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@65591 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/dwarf2out.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index d5b5ca7a664..a53b3b686b5 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2003-04-14 Joel Brobecker <brobecker@gnat.com> + + * dwarf2out.c (gen_compile_unit_die): Emit DW_LANG_Ada95 instead + of DW_LANG_Ada83 for Ada units. + 2003-04-14 Olivier Hainque <hainque@act-europe.fr> * fold-const.c (fold): Reorder tests for conditional expressions. diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c index 7945d14ebc1..45a6d62126b 100644 --- a/gcc/dwarf2out.c +++ b/gcc/dwarf2out.c @@ -11447,7 +11447,7 @@ gen_compile_unit_die (filename) if (strcmp (language_string, "GNU C++") == 0) language = DW_LANG_C_plus_plus; else if (strcmp (language_string, "GNU Ada") == 0) - language = DW_LANG_Ada83; + language = DW_LANG_Ada95; else if (strcmp (language_string, "GNU F77") == 0) language = DW_LANG_Fortran77; else if (strcmp (language_string, "GNU Pascal") == 0) |