diff options
Diffstat (limited to 'src/synth/synth-decls.ads')
| -rw-r--r-- | src/synth/synth-decls.ads | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/src/synth/synth-decls.ads b/src/synth/synth-decls.ads index 68b7fea08..a42305771 100644 --- a/src/synth/synth-decls.ads +++ b/src/synth/synth-decls.ads @@ -20,6 +20,8 @@ with Vhdl.Nodes; use Vhdl.Nodes; +with Netlists; use Netlists; + with Synth.Context; use Synth.Context; with Synth.Objtypes; use Synth.Objtypes; @@ -42,11 +44,13 @@ package Synth.Decls is procedure Synth_Declaration (Syn_Inst : Synth_Instance_Acc; Decl : Node; + En : Net; Is_Subprg : Boolean; Last_Type : in out Node); procedure Synth_Declarations (Syn_Inst : Synth_Instance_Acc; Decls : Iir; + En : Net; Is_Subprg : Boolean := False); procedure Finalize_Declarations (Syn_Inst : Synth_Instance_Acc; @@ -54,15 +58,16 @@ package Synth.Decls is Is_Subprg : Boolean := False); procedure Synth_Package_Declaration - (Parent_Inst : Synth_Instance_Acc; Pkg : Node); + (Parent_Inst : Synth_Instance_Acc; Pkg : Node; En : Net); procedure Synth_Package_Body - (Parent_Inst : Synth_Instance_Acc; Pkg : Node; Bod : Node); + (Parent_Inst : Synth_Instance_Acc; Pkg : Node; Bod : Node; En : Net); procedure Synth_Generics_Association (Sub_Inst : Synth_Instance_Acc; Syn_Inst : Synth_Instance_Acc; Inter_Chain : Node; - Assoc_Chain : Node); + Assoc_Chain : Node; + En : Net); procedure Synth_Package_Instantiation - (Parent_Inst : Synth_Instance_Acc; Pkg : Node); + (Parent_Inst : Synth_Instance_Acc; Pkg : Node; En : Net); end Synth.Decls; |