diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-03-13 08:17:08 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-03-13 08:17:08 +0100 |
| commit | ee3a04b7dbfc796057a2ac0c8c1ae07744cc175d (patch) | |
| tree | 01df5b2b51e40cc0f518961b26020f211760a0ca | |
| parent | 1f74b9c76a10dc727531996a134a933a242c022e (diff) | |
| download | ghdl-ee3a04b7dbfc796057a2ac0c8c1ae07744cc175d.tar.gz ghdl-ee3a04b7dbfc796057a2ac0c8c1ae07744cc175d.tar.bz2 ghdl-ee3a04b7dbfc796057a2ac0c8c1ae07744cc175d.zip | |
synth-oper: handle const for numeric_std.match Fix #1679
| -rw-r--r-- | src/synth/synth-oper.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/synth/synth-oper.adb b/src/synth/synth-oper.adb index 0cf51f91d..99c3c474b 100644 --- a/src/synth/synth-oper.adb +++ b/src/synth/synth-oper.adb @@ -2054,6 +2054,7 @@ package body Synth.Oper is (+Expr, "operands of std_match don't have the same size"); return Create_Value_Discrete (0, Boolean_Type); end if; + Strip_Const (Cst); Res := Synth_Match (Ctxt, Cst, Oper, Expr); if Res = No_Net then return Create_Value_Discrete (0, Boolean_Type); |