diff options
author | rus <rus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-10-02 23:25:15 +0000 |
---|---|---|
committer | rus <rus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-10-02 23:25:15 +0000 |
commit | 611349f0ec42a37591db2cd02974a11a48d10edb (patch) | |
tree | 2a5c3eecca5f0b75352af30aad7f366c69281c2c /gcc/ada/gcc-interface/misc.c | |
parent | 0012f4fdae066f73c9f38cb33d3a338c3e356cdf (diff) | |
download | gcc-611349f0ec42a37591db2cd02974a11a48d10edb.tar.gz |
merge from trunk
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/profile-stdlib@152425 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gcc-interface/misc.c')
-rw-r--r-- | gcc/ada/gcc-interface/misc.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/misc.c b/gcc/ada/gcc-interface/misc.c index 26df68de581..67823789ab3 100644 --- a/gcc/ada/gcc-interface/misc.c +++ b/gcc/ada/gcc-interface/misc.c @@ -521,6 +521,11 @@ gnat_print_type (FILE *file, tree node, int indent) print_node (file,"actual bounds", TYPE_ACTUAL_BOUNDS (node), indent + 4); break; + case VECTOR_TYPE: + print_node (file,"representative array", + TYPE_REPRESENTATIVE_ARRAY (node), indent + 4); + break; + case RECORD_TYPE: if (TYPE_IS_FAT_POINTER_P (node) || TYPE_CONTAINS_TEMPLATE_P (node)) print_node (file, "unconstrained array", |