diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-09-08 07:49:53 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-09-11 06:37:26 +0200 |
| commit | 67333b39047b444ea93f1efcabf7ea7b0371a972 (patch) | |
| tree | f999cda95e5f42d745f149f29ce2b06a3e148304 /src/synth/synth-stmts.ads | |
| parent | 2b3a1bb316317453d4e40bc3a650b4ed07eee7a8 (diff) | |
| download | ghdl-67333b39047b444ea93f1efcabf7ea7b0371a972.tar.gz ghdl-67333b39047b444ea93f1efcabf7ea7b0371a972.tar.bz2 ghdl-67333b39047b444ea93f1efcabf7ea7b0371a972.zip | |
synth: handle alias (WIP, read only).
Diffstat (limited to 'src/synth/synth-stmts.ads')
| -rw-r--r-- | src/synth/synth-stmts.ads | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.ads b/src/synth/synth-stmts.ads index cdd26e8eb..884ea299b 100644 --- a/src/synth/synth-stmts.ads +++ b/src/synth/synth-stmts.ads @@ -22,6 +22,7 @@ with Types; use Types; with Vhdl.Nodes; use Vhdl.Nodes; with Synth.Values; use Synth.Values; with Synth.Context; use Synth.Context; +with Synth.Environment; use Synth.Environment; package Synth.Stmts is procedure Synth_Subprogram_Association (Subprg_Inst : Synth_Instance_Acc; @@ -29,6 +30,12 @@ package Synth.Stmts is Inter_Chain : Node; Assoc_Chain : Node); + procedure Synth_Assignment_Prefix (Syn_Inst : Synth_Instance_Acc; + Pfx : Node; + Dest_Wid : out Wire_Id; + Dest_Off : out Uns32; + Dest_Type : out Type_Acc); + procedure Synth_Assignment (Syn_Inst : Synth_Instance_Acc; Target : Node; Val : Value_Acc; |