diff options
Diffstat (limited to 'src/synth/synth-oper.adb')
| -rw-r--r-- | src/synth/synth-oper.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/synth-oper.adb b/src/synth/synth-oper.adb index d0b7a7f5d..ea72933ef 100644 --- a/src/synth/synth-oper.adb +++ b/src/synth/synth-oper.adb @@ -418,6 +418,10 @@ package body Synth.Oper is when Iir_Predefined_Array_Equality => -- TODO: check size, handle non-vector. + if Is_Const (Left) and then Is_Const (Right) then + return Create_Value_Discrete + (Boolean'Pos (Is_Equal (Left, Right)), Boolean_Type); + end if; if Is_Vector_Type (Left_Type) then return Synth_Compare (Id_Eq); else |