aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/libgnat/a-cfinve.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/libgnat/a-cfinve.adb')
-rw-r--r--gcc/ada/libgnat/a-cfinve.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/libgnat/a-cfinve.adb b/gcc/ada/libgnat/a-cfinve.adb
index 28e31d1..e424df0 100644
--- a/gcc/ada/libgnat/a-cfinve.adb
+++ b/gcc/ada/libgnat/a-cfinve.adb
@@ -40,7 +40,7 @@ is
-- When growing a container, multiply current capacity by this. Doubling
-- leads to amortized linear-time copying.
- type Int is range System.Min_Int .. System.Max_Int;
+ subtype Int is Long_Long_Integer;
procedure Free is
new Ada.Unchecked_Deallocation (Elements_Array, Elements_Array_Ptr);