diff options
Diffstat (limited to 'src/tables.ads')
-rw-r--r-- | src/tables.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/tables.ads b/src/tables.ads index 9a506d871..a76398d2f 100644 --- a/src/tables.ads +++ b/src/tables.ads @@ -79,4 +79,8 @@ package Tables is -- of Last + 1. function Allocate (Num : Natural := 1) return Table_Index_Type; pragma Inline (Allocate); + + -- Reserve memory for NUM extra elements. + procedure Reserve (Num : Natural := 1); + pragma Inline (Reserve); end Tables; |