diff options
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/utils.c | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c1611e5..6092a21 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2010-09-10 Richard Guenther <rguenther@suse.de> + + * gcc-interface/utils.c (create_index_type): Use build_range_type. + 2010-09-10 Arnaud Charlet <charlet@adacore.com> * vms_cmds.ads: New. diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index c3a39d4..cadc4d7 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -1156,7 +1156,7 @@ tree create_index_type (tree min, tree max, tree index, Node_Id gnat_node) { /* First build a type for the desired range. */ - tree type = build_index_2_type (min, max); + tree type = build_range_type (sizetype, min, max); /* If this type has the TYPE_INDEX_TYPE we want, return it. */ if (TYPE_INDEX_TYPE (type) == index) |