blob: f8b2eb3ab79c479e933065ecc3c9718189f27cda (
plain)
1
2
3
4
5
6
7
8
9
|
with PSL.Nodes; use PSL.Nodes;
package PSL.Dump_Tree is
procedure Dump_Tree (N : Node; Full : Boolean := False);
-- Procedure to dump an HDL node.
type Dump_Hdl_Node_Acc is access procedure (N : HDL_Node);
Dump_Hdl_Node : Dump_Hdl_Node_Acc := null;
end PSL.Dump_Tree;
|
