diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-07-14 05:46:50 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-07-14 05:46:50 +0200 |
| commit | 657f8e0d2b78a53d660ff144153f79083a3ec91d (patch) | |
| tree | cb705d6d7e8f2ab4dd3dc2ec27043d0805ece9af | |
| parent | a12c857af5ce335b0b05ee774bd6e08ba6b17846 (diff) | |
| download | ghdl-657f8e0d2b78a53d660ff144153f79083a3ec91d.tar.gz ghdl-657f8e0d2b78a53d660ff144153f79083a3ec91d.tar.bz2 ghdl-657f8e0d2b78a53d660ff144153f79083a3ec91d.zip | |
synth: handle anonymous signals.
| -rw-r--r-- | src/synth/synth-expr.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb index a12ed5912..054ec43e2 100644 --- a/src/synth/synth-expr.adb +++ b/src/synth/synth-expr.adb @@ -895,6 +895,7 @@ package body Synth.Expr is when Iir_Kind_Interface_Signal_Declaration | Iir_Kind_Variable_Declaration | Iir_Kind_Signal_Declaration + | Iir_Kind_Anonymous_Signal_Declaration | Iir_Kind_Interface_Constant_Declaration | Iir_Kind_Constant_Declaration | Iir_Kind_Iterator_Declaration => @@ -1600,6 +1601,8 @@ package body Synth.Expr is when Iir_Kind_Simple_Name | Iir_Kind_Interface_Signal_Declaration => -- For PSL... return Synth_Name (Syn_Inst, Expr); + when Iir_Kind_Reference_Name => + return Synth_Name (Syn_Inst, Get_Named_Entity (Expr)); when Iir_Kind_Indexed_Name => return Synth_Indexed_Name (Syn_Inst, Expr); when Iir_Kind_Slice_Name => |