diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-07-25 05:12:24 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-07-25 05:12:24 +0200 |
| commit | 4030d67a73d4b5254912c586b6638ca3851855d6 (patch) | |
| tree | 4922d6f35cf9160291eba352ee5f0b2254d41342 /src/dyn_tables.ads | |
| parent | 88a4798285037a18cb7d27057474d52eca819520 (diff) | |
| download | ghdl-4030d67a73d4b5254912c586b6638ca3851855d6.tar.gz ghdl-4030d67a73d4b5254912c586b6638ca3851855d6.tar.bz2 ghdl-4030d67a73d4b5254912c586b6638ca3851855d6.zip | |
dyn_tables,tables: add Reserve. For #2139
Diffstat (limited to 'src/dyn_tables.ads')
| -rw-r--r-- | src/dyn_tables.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/dyn_tables.ads b/src/dyn_tables.ads index 4f8096f81..d6577de60 100644 --- a/src/dyn_tables.ads +++ b/src/dyn_tables.ads @@ -91,6 +91,8 @@ package Dyn_Tables is -- Increase by NUM the length of the array. procedure Allocate (T : in out Instance; Num : Natural := 1); + -- Reserve memory for NUM extra entries. + procedure Reserve (T : in out Instance; Num : Natural); private type Unsigned is mod 2**32; |