diff options
| author | Tristan Gingold <tgingold@free.fr> | 2016-02-07 07:29:38 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2016-02-09 20:25:02 +0100 |
| commit | 5ddefe0ca2f02afdb7a10717b9feb77a42fbc901 (patch) | |
| tree | 6203c06742e2e00b75ccdc40b56945c5305c738a /src/vhdl/disp_tree.ads | |
| parent | f5130442c175e7308e26b092dcebd0c6901e4881 (diff) | |
| download | ghdl-5ddefe0ca2f02afdb7a10717b9feb77a42fbc901.tar.gz ghdl-5ddefe0ca2f02afdb7a10717b9feb77a42fbc901.tar.bz2 ghdl-5ddefe0ca2f02afdb7a10717b9feb77a42fbc901.zip | |
Improve mixed dump of PSL and VHDL nodes.
Diffstat (limited to 'src/vhdl/disp_tree.ads')
| -rw-r--r-- | src/vhdl/disp_tree.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/vhdl/disp_tree.ads b/src/vhdl/disp_tree.ads index 94b1d29e3..f30c6278f 100644 --- a/src/vhdl/disp_tree.ads +++ b/src/vhdl/disp_tree.ads @@ -20,8 +20,8 @@ with Iirs; use Iirs; package Disp_Tree is -- Disp TREE recursively. - procedure Disp_Tree (Tree : Iir; - Flat : Boolean := False); + procedure Disp_Tree (Tree : Iir; Flat : Boolean := False); - procedure Disp_Tree_For_Psl (N : Int32); + procedure Disp_Tree_For_Psl + (N : Int32; Indent : Natural; Depth : Natural); end Disp_Tree; |