diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-06-30 06:58:25 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-06-30 06:58:25 +0200 |
commit | f33ab7adaf25c78fa88beac25df4f0d596b9d94c (patch) | |
tree | 747fba87d1b486a20207ba4099348870bf7e97eb /src/vhdl/translate/trans-chap7.adb | |
parent | e45c19474897208c723af863db0d3337bf44928b (diff) | |
download | ghdl-f33ab7adaf25c78fa88beac25df4f0d596b9d94c.tar.gz ghdl-f33ab7adaf25c78fa88beac25df4f0d596b9d94c.tar.bz2 ghdl-f33ab7adaf25c78fa88beac25df4f0d596b9d94c.zip |
vhdl: handle mod/rem for physical. Fix #1810
Diffstat (limited to 'src/vhdl/translate/trans-chap7.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap7.adb | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap7.adb b/src/vhdl/translate/trans-chap7.adb index 618ca996d..07c28ac33 100644 --- a/src/vhdl/translate/trans-chap7.adb +++ b/src/vhdl/translate/trans-chap7.adb @@ -1095,6 +1095,8 @@ package body Trans.Chap7 is Iir_Predefined_Physical_Absolute => ON_Abs_Ov, Iir_Predefined_Physical_Minus => ON_Sub_Ov, Iir_Predefined_Physical_Plus => ON_Add_Ov, + Iir_Predefined_Physical_Rem => ON_Rem_Ov, + Iir_Predefined_Physical_Mod => ON_Mod_Ov, Iir_Predefined_Floating_Greater => ON_Gt, Iir_Predefined_Floating_Greater_Equal => ON_Ge, @@ -6134,7 +6136,9 @@ package body Trans.Chap7 is | Iir_Predefined_Physical_Negation | Iir_Predefined_Physical_Absolute | Iir_Predefined_Physical_Plus - | Iir_Predefined_Physical_Minus => + | Iir_Predefined_Physical_Minus + | Iir_Predefined_Physical_Mod + | Iir_Predefined_Physical_Rem => pragma Assert (Predefined_To_Onop (Kind) /= ON_Nil); return; |