mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2025-02-09 02:37:38 +00:00
2007-09-26 Pierre Muller <muller@ics.u-strasbg.fr>
* Fix PR pascal/2231 dwarf2read.c (read_subroutine_type): All pascal functions are prototyped.
This commit is contained in:
parent
d17e0c6e9a
commit
5b8101ae7b
@ -1,3 +1,9 @@
|
||||
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
|
||||
|
@ -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)
|
||||
|
Loading…
x
Reference in New Issue
Block a user