1 files changed, 1 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-nodes_gc.adb b/src/vhdl/vhdl-nodes_gc.adb
index 8876528ff..d20f2a89e 100644
--- a/src/vhdl/vhdl-nodes_gc.adb
+++ b/src/vhdl/vhdl-nodes_gc.adb
@@ -19,7 +19,6 @@
 with Ada.Unchecked_Deallocation;
 with Types; use Types;
 with Logging; use Logging;
-with Nodes;
 with Nodes_Meta; use Nodes_Meta;
 with Errorout; use Errorout;
 with Libraries;
@@ -497,7 +496,7 @@ package body Vhdl.Nodes_GC is
             Nbr_Unreferenced := Nbr_Unreferenced + 1;
             Report_Unreferenced_Node (El);
          end if;
-         El := Iir (Nodes.Next_Node (Nodes.Node_Type (El)));
+         El := Next_Node (El);
       end loop;
 
       Free (Markers);