diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-01-25 08:32:43 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-01-25 08:32:43 +0100 |
| commit | e8dfac4cfb9f16c2cf862c384a2d685927f7294f (patch) | |
| tree | a07850c1fa9f016795e69217f6f48735e3c1d203 | |
| parent | 52a9954e29fe72ed5c90f696bc8a600b22089dea (diff) | |
| download | ghdl-e8dfac4cfb9f16c2cf862c384a2d685927f7294f.tar.gz ghdl-e8dfac4cfb9f16c2cf862c384a2d685927f7294f.tar.bz2 ghdl-e8dfac4cfb9f16c2cf862c384a2d685927f7294f.zip | |
synth: handle function call in names. Fix #1114
| -rw-r--r-- | src/synth/synth-stmts.adb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb index 066eea680..7b8a9434f 100644 --- a/src/synth/synth-stmts.adb +++ b/src/synth/synth-stmts.adb @@ -168,6 +168,12 @@ package body Synth.Stmts is Dest_Off := 0; end if; end; + when Iir_Kind_Function_Call => + Dest_Obj := Synth_Expression (Syn_Inst, Pfx); + Dest_Off := 0; + Dest_Voff := No_Net; + Dest_Rdwd := 0; + Dest_Type := Dest_Obj.Typ; when Iir_Kind_Indexed_Name => declare Voff : Net; |