aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-nodes.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-nodes.adb')
-rw-r--r--src/vhdl/vhdl-nodes.adb2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-nodes.adb b/src/vhdl/vhdl-nodes.adb
index b5dd5e0bd..0b7bf62f3 100644
--- a/src/vhdl/vhdl-nodes.adb
+++ b/src/vhdl/vhdl-nodes.adb
@@ -739,6 +739,8 @@ package body Vhdl.Nodes is
procedure Initialize is
begin
+ Free_Chain := Null_Node;
+ Nbr_Free_Hooks := 0;
Nodet.Init;
end Initialize;