diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-07-29 06:15:27 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-07-29 06:15:27 +0200 |
commit | 55c94a0dfe0aff8f36003bbd6ae266709d03f270 (patch) | |
tree | 750e277e7e9a0ac1ddf12d663accb5a5894b5b13 | |
parent | 7728dc5bb88740a9a36b3b385d8871171e733b89 (diff) | |
download | ghdl-55c94a0dfe0aff8f36003bbd6ae266709d03f270.tar.gz ghdl-55c94a0dfe0aff8f36003bbd6ae266709d03f270.tar.bz2 ghdl-55c94a0dfe0aff8f36003bbd6ae266709d03f270.zip |
netlists-memories: allow X in memories. Fix #2146
-rw-r--r-- | src/synth/netlists-memories.adb | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/synth/netlists-memories.adb b/src/synth/netlists-memories.adb index ffc3316ba..f0af40455 100644 --- a/src/synth/netlists-memories.adb +++ b/src/synth/netlists-memories.adb @@ -1313,7 +1313,8 @@ package body Netlists.Memories is Inst := Get_Input_Instance (Inst, 0); when Id_Isignal | Id_Signal - | Id_Const_Bit => + | Id_Const_Bit + | Id_Const_Log => return Inst; when others => if Flag_Memory_Verbose then @@ -2439,7 +2440,8 @@ package body Netlists.Memories is case Get_Id (Inst) is when Id_Isignal | Id_Signal - | Id_Const_Bit => + | Id_Const_Bit + | Id_Const_Log => null; when others => raise Internal_Error; |