diff options
| author | Christos Gentsos <christos.gentsos@cern.ch> | 2019-06-06 13:57:03 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-06-06 19:06:28 +0200 |
| commit | bec60c58f045c667f3656a00bf0aeb0261c45d6f (patch) | |
| tree | 2a665fd5f342b357c274b5db12f76de9691a7ddb | |
| parent | 761b344a1cd3018eb5b6b60ea5efc047c199fe23 (diff) | |
| download | ghdl-bec60c58f045c667f3656a00bf0aeb0261c45d6f.tar.gz ghdl-bec60c58f045c667f3656a00bf0aeb0261c45d6f.tar.bz2 ghdl-bec60c58f045c667f3656a00bf0aeb0261c45d6f.zip | |
synth: handle array equality op (just for arrays of identical range)
| -rw-r--r-- | src/synth/synth-expr.adb | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb index 7299cfe70..7dd855f97 100644 --- a/src/synth/synth-expr.adb +++ b/src/synth/synth-expr.adb @@ -474,6 +474,14 @@ package body Synth.Expr is -- TODO Error_Msg_Synth (+Loc, "unsupported enum equality"); raise Internal_Error; + + when Iir_Predefined_Array_Equality => + return Create_Value_Net + (Build_Compare (Build_Context, Id_Eq, + Get_Net (Left), + Get_Net (Right)), + No_Range); + when Iir_Predefined_Ieee_Numeric_Std_Add_Uns_Nat => -- "+" (Unsigned, Natural) declare |