diff options
Diffstat (limited to 'src/vhdl/translate/trans.adb')
-rw-r--r-- | src/vhdl/translate/trans.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/vhdl/translate/trans.adb b/src/vhdl/translate/trans.adb index b9455965d..9b0029205 100644 --- a/src/vhdl/translate/trans.adb +++ b/src/vhdl/translate/trans.adb @@ -17,7 +17,7 @@ -- 02111-1307, USA. with Name_Table; -- use Name_Table; -with Nodes; +with Vhdl.Nodes_Priv; with Tables; with Trans_Decls; use Trans_Decls; @@ -1368,11 +1368,11 @@ package body Trans is procedure Update_Node_Infos is - use Nodes; + use Vhdl.Nodes_Priv; F, L : Iir; begin F := Node_Infos.Last; - L := Nodes.Get_Last_Node; + L := Get_Last_Node; Node_Infos.Set_Last (L); Node_Infos.Table (F + 1 .. L) := (others => null); end Update_Node_Infos; |