diff options
Diffstat (limited to 'gcc/ada/a-cobove.adb')
| -rw-r--r-- | gcc/ada/a-cobove.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/a-cobove.adb b/gcc/ada/a-cobove.adb index bcd6118..b2e75b5 100644 --- a/gcc/ada/a-cobove.adb +++ b/gcc/ada/a-cobove.adb @@ -2390,7 +2390,7 @@ package body Ada.Containers.Bounded_Vectors is is begin if Capacity > Container.Capacity then - raise Constraint_Error with "Capacity is out of range"; + raise Capacity_Error with "Capacity is out of range"; end if; end Reserve_Capacity; |