diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-10-28 18:41:41 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-10-28 18:41:41 +0100 |
| commit | 13a28fa63e8dca2b31e09c2b393a6440b64d05b8 (patch) | |
| tree | 6a3ed0c47ded7d645968c0ba41a23dee6d7ae047 | |
| parent | d88c6ff6fd6ed2c43dfd7f0a4b4dfabb20c890a1 (diff) | |
| download | ghdl-13a28fa63e8dca2b31e09c2b393a6440b64d05b8.tar.gz ghdl-13a28fa63e8dca2b31e09c2b393a6440b64d05b8.tar.bz2 ghdl-13a28fa63e8dca2b31e09c2b393a6440b64d05b8.zip | |
netlists-disp_vhdl: prefix of strunc/utrunc cannot be a constant.
| -rw-r--r-- | src/synth/netlists-disp_vhdl.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/synth/netlists-disp_vhdl.adb b/src/synth/netlists-disp_vhdl.adb index 78f1efe0d..0ebb67c87 100644 --- a/src/synth/netlists-disp_vhdl.adb +++ b/src/synth/netlists-disp_vhdl.adb @@ -436,7 +436,9 @@ package body Netlists.Disp_Vhdl is case Id is when Id_Extract | Id_Dyn_Extract - | Id_Dyn_Insert => + | Id_Dyn_Insert + | Id_Utrunc + | Id_Strunc => return True; when Id_User_None .. Module_Id'Last => return True; |