From bbdcad893c34119c56812b9936fbc5e2dcc62f5c Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 27 Jan 2016 05:12:38 +0100
Subject: translation: use Tables instead of GNAT.Table.

---
 src/vhdl/translate/trans.adb | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'src')

diff --git a/src/vhdl/translate/trans.adb b/src/vhdl/translate/trans.adb
index 93052b9e9..eca2eacc5 100644
--- a/src/vhdl/translate/trans.adb
+++ b/src/vhdl/translate/trans.adb
@@ -18,7 +18,7 @@
 
 with Name_Table; -- use Name_Table;
 with Nodes;
-with GNAT.Table;
+with Tables;
 with Trans_Decls; use Trans_Decls;
 
 package body Trans is
@@ -1244,12 +1244,11 @@ package body Trans is
          Res_Ptr);
    end Add_Pointer;
 
-   package Node_Infos is new GNAT.Table
+   package Node_Infos is new Tables
      (Table_Component_Type => Ortho_Info_Acc,
       Table_Index_Type => Iir,
       Table_Low_Bound => 0,
-      Table_Initial => 1024,
-      Table_Increment => 100);
+      Table_Initial => 1024);
 
    procedure Init_Node_Infos is
    begin
-- 
cgit v1.2.3