diff options
| author | Eugene Tarassov | 2014-10-17 20:27:27 +0000 |
|---|---|---|
| committer | Eugene Tarassov | 2014-10-17 20:27:27 +0000 |
| commit | b35bd987f8948c8e5040303639cf5265af294f74 (patch) | |
| tree | 5603bd7dc2a391dc1e23cb0ddeae1e9808061048 | |
| parent | a39c4fb6aa20b4f252b7d8071bcd6af91c201de1 (diff) | |
| download | org.eclipse.tcf.agent-b35bd987f8948c8e5040303639cf5265af294f74.tar.gz org.eclipse.tcf.agent-b35bd987f8948c8e5040303639cf5265af294f74.tar.xz org.eclipse.tcf.agent-b35bd987f8948c8e5040303639cf5265af294f74.zip | |
TCF Agent: added DWARF declarations for AT_GNAT_descriptive_type
| -rw-r--r-- | agent/tcf/services/dwarf.h | 4 | ||||
| -rw-r--r-- | agent/tcf/services/dwarfcache.c | 1 |
2 files changed, 5 insertions, 0 deletions
diff --git a/agent/tcf/services/dwarf.h b/agent/tcf/services/dwarf.h index c88e75dd..4bb077fb 100644 --- a/agent/tcf/services/dwarf.h +++ b/agent/tcf/services/dwarf.h @@ -241,6 +241,10 @@ #define AT_wrs_options 0x2001 #define AT_MIPS_linkage_name 0x2007 #define AT_GNU_call_site_value 0x2111 +/* GNAT descriptive type extension. + * See http://gcc.gnu.org/wiki/DW_AT_GNAT_descriptive_type */ +#define AT_GNAT_use_descriptive_type 0x2301 +#define AT_GNAT_descriptive_type 0x2302 #define AT_hi_user_v2 0x3fff diff --git a/agent/tcf/services/dwarfcache.c b/agent/tcf/services/dwarfcache.c index 82a5a319..295d54b7 100644 --- a/agent/tcf/services/dwarfcache.c +++ b/agent/tcf/services/dwarfcache.c @@ -1524,6 +1524,7 @@ void read_dwarf_object_property(Context * Ctx, int Frame, ObjectInfo * Obj, U2_T case AT_specification_v2: case AT_abstract_origin: case AT_containing_type: + case AT_GNAT_descriptive_type: Value->mValue = gop_gFormData; break; default: |