diff options
author | Pierre Muller <muller@sourceware.org> | 2007-09-26 13:59:54 +0000 |
---|---|---|
committer | Pierre Muller <muller@sourceware.org> | 2007-09-26 13:59:54 +0000 |
commit | 5b8101ae7bd7e95bfa6404d7403b51176785f2e8 (patch) | |
tree | c6c32aec8416ea75cb96fe45a39c5500c2b3819d /gdb | |
parent | d17e0c6e9a7d377e81dfbd6a8b0fd42fe7b502db (diff) | |
download | gdb-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/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/dwarf2read.c | 5 |
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) |