From f1c30ad16e0914455ee2c84e80714f6b271021f2 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 30 Dec 2020 10:29:16 +0100
Subject: Rework initialization and finalization.

libghdl can now be re-initialized.
---
 src/str_table.ads | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src/str_table.ads')

diff --git a/src/str_table.ads b/src/str_table.ads
index fd783562e..c15bd8089 100644
--- a/src/str_table.ads
+++ b/src/str_table.ads
@@ -58,6 +58,9 @@ package Str_Table is
    --  valid anymore.
    function String8_Address (Id : String8_Id) return System.Address;
 
-   --  Free all the memory and reinitialize the package.
+   --  Free all the memory
+   procedure Finalize;
+
+   --  Initialize the package.
    procedure Initialize;
 end Str_Table;
-- 
cgit v1.2.3