aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorPierre Muller <muller@sourceware.org>2007-09-26 13:59:54 +0000
committerPierre Muller <muller@sourceware.org>2007-09-26 13:59:54 +0000
commit5b8101ae7bd7e95bfa6404d7403b51176785f2e8 (patch)
treec6c32aec8416ea75cb96fe45a39c5500c2b3819d /gdb
parentd17e0c6e9a7d377e81dfbd6a8b0fd42fe7b502db (diff)
downloadgdb-5b8101ae7bd7e95bfa6404d7403b51176785f2e8.zip
gdb-5b8101ae7bd7e95bfa6404d7403b51176785f2e8.tar.gz
gdb-5b8101ae7bd7e95bfa6404d7403b51176785f2e8.tar.bz2
2007-09-26 Pierre Muller <muller@ics.u-strasbg.fr>
* Fix PR pascal/2231 dwarf2read.c (read_subroutine_type): All pascal functions are prototyped.
Diffstat (limited to 'gdb')
-rw-r--r--gdb/ChangeLog6
-rw-r--r--gdb/dwarf2read.c5
2 files changed, 9 insertions, 2 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 50c6b35..0ff49e2 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,11 @@
2007-09-26 Pierre Muller <muller@ics.u-strasbg.fr>
+ * Fix PR pascal/2231
+ dwarf2read.c (read_subroutine_type):
+ All pascal functions are prototyped.
+
+2007-09-26 Pierre Muller <muller@ics.u-strasbg.fr>
+
* Fix PR pascal/2283
p-valprint.c (pascal_val_print): correct current language check.
Also print array of char as strings.
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c
index 370035f..e5e8aa4 100644
--- a/gdb/dwarf2read.c
+++ b/gdb/dwarf2read.c
@@ -4744,11 +4744,12 @@ read_subroutine_type (struct die_info *die, struct dwarf2_cu *cu)
type = die_type (die, cu);
ftype = make_function_type (type, (struct type **) 0);
- /* All functions in C++ and Java have prototypes. */
+ /* All functions in C++, Pascal and Java have prototypes. */
attr = dwarf2_attr (die, DW_AT_prototyped, cu);
if ((attr && (DW_UNSND (attr) != 0))
|| cu->language == language_cplus
- || cu->language == language_java)
+ || cu->language == language_java
+ || cu->language == language_pascal)
TYPE_FLAGS (ftype) |= TYPE_FLAG_PROTOTYPED;
if (die->child != NULL)