1 files changed, 2 insertions, 7 deletions
diff --git a/disp_tree.ads b/disp_tree.ads
index 63720ee2b..94b1d29e3 100644
--- a/disp_tree.ads
+++ b/disp_tree.ads
@@ -19,14 +19,9 @@ with Types; use Types;
 with Iirs; use Iirs;
 
 package Disp_Tree is
-   --  Disp NODE as an address.  The format is "[XXXXXXXX]", where each X is
-   --  an hexadecimal digit (quotes are not displayed).
-   procedure Disp_Iir_Address (Node: Iir);
-
    --  Disp TREE recursively.
-   procedure Disp_Tree (Tree: Iir;
-                        Tab: Natural := 0;
-                        Flat_Decl: Boolean := false);
+   procedure Disp_Tree (Tree : Iir;
+                        Flat : Boolean := False);
 
    procedure Disp_Tree_For_Psl (N : Int32);
 end Disp_Tree;