diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-04-13 06:18:16 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-04-13 06:18:16 +0200 |
| commit | d0dbcb453c2af50ae1d117dfce81ab52c124d5db (patch) | |
| tree | 8d5163e3f01427e0bc6abf4c717e9e8c4f7603b9 | |
| parent | d5d6bfa994052e387e8c0ed6b424b20a2ef34eab (diff) | |
| download | ghdl-d0dbcb453c2af50ae1d117dfce81ab52c124d5db.tar.gz ghdl-d0dbcb453c2af50ae1d117dfce81ab52c124d5db.tar.bz2 ghdl-d0dbcb453c2af50ae1d117dfce81ab52c124d5db.zip | |
synth: handle sub_nat_uns. Fix #1221
| -rw-r--r-- | src/synth/synth-oper.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/synth-oper.adb b/src/synth/synth-oper.adb index c78515e57..11b6c4396 100644 --- a/src/synth/synth-oper.adb +++ b/src/synth/synth-oper.adb @@ -868,6 +868,9 @@ package body Synth.Oper is | Iir_Predefined_Ieee_Std_Logic_Arith_Sub_Uns_Log_Uns => -- "-" (Unsigned, Unsigned) return Synth_Dyadic_Uns_Uns (Id_Sub, Left, Right, Expr); + when Iir_Predefined_Ieee_Numeric_Std_Sub_Nat_Uns => + -- "-" (Natural, Unsigned) + return Synth_Dyadic_Nat_Uns (Id_Sub, Left, Right, Expr); when Iir_Predefined_Ieee_Numeric_Std_Sub_Sgn_Int | Iir_Predefined_Ieee_Std_Logic_Signed_Sub_Slv_Int => -- "-" (Signed, Integer) |