diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-09-21 09:31:28 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-09-21 09:31:28 +0200 |
| commit | 69c0747b03292bef5f2c5bd5672e7fa214182937 (patch) | |
| tree | 430c8a831307650f64dd3ee0662d4660bbca7255 /src/synth | |
| parent | 1bb482dc531d0b6485c128184ab77674df0fcfdb (diff) | |
| download | ghdl-69c0747b03292bef5f2c5bd5672e7fa214182937.tar.gz ghdl-69c0747b03292bef5f2c5bd5672e7fa214182937.tar.bz2 ghdl-69c0747b03292bef5f2c5bd5672e7fa214182937.zip | |
synth: fix tgingold/ghdlsynth-beta#27
Diffstat (limited to 'src/synth')
| -rw-r--r-- | src/synth/synth-expr.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb index 9ddd906d1..bba515707 100644 --- a/src/synth/synth-expr.adb +++ b/src/synth/synth-expr.adb @@ -1510,7 +1510,8 @@ package body Synth.Expr is end if; end; when Iir_Kind_Simple_Name - | Iir_Kind_Interface_Signal_Declaration => -- For PSL... + | Iir_Kind_Interface_Signal_Declaration -- For PSL. + | Iir_Kind_Signal_Declaration => -- For PSL. Res := Synth_Name (Syn_Inst, Expr); return Synth_Subtype_Conversion (Res, Get_Value_Type (Syn_Inst, Expr_Type), Expr); |