diff options
| author | Vladimir Mezentsev <vladimir.mezentsev@oracle.com> | 2023-02-16 19:35:35 -0800 |
|---|---|---|
| committer | Vladimir Mezentsev <vladimir.mezentsev@oracle.com> | 2023-02-17 14:00:54 -0800 |
| commit | 490ea364df8bea907b6990200912b99ce79e6a55 (patch) | |
| tree | 3a308e0fe0c0f7d58ef83f856af9fd5b048068c9 | |
| parent | f6f19a39ecfe962cb8a05522c27f513308687a74 (diff) | |
| download | gdb-490ea364df8bea907b6990200912b99ce79e6a55.zip gdb-490ea364df8bea907b6990200912b99ce79e6a55.tar.gz gdb-490ea364df8bea907b6990200912b99ce79e6a55.tar.bz2 | |
gprofng: fix Dwarf reader for DW_TAG_subprogram
gprofng/ChangeLog
2023-02-16 Vladimir Mezentsev <vladimir.mezentsev@oracle.com>
* src/Dwarf.cc: Skip DW_TAG_subprogram when DW_AT_declaration is 1.
| -rw-r--r-- | gprofng/src/Dwarf.cc | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gprofng/src/Dwarf.cc b/gprofng/src/Dwarf.cc index 5485be7..fb430cd 100644 --- a/gprofng/src/Dwarf.cc +++ b/gprofng/src/Dwarf.cc @@ -499,8 +499,7 @@ DwrCU::parseChild (Dwarf_cnt *ctx) if (link_name && streq (link_name, NTXT ("MAIN"))) ctx->fortranMAIN = Stabs::find_func (NTXT ("MAIN"), ctx->module->functions, true, true); } - if (get_linkage_name () == NULL) - break; + break; } func = append_Function (ctx); if (func) |