diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-11-26 19:23:59 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-11-26 19:23:59 +0100 |
commit | 9021ecbd3b9a457024d7cb4e6daa1322ecbbd611 (patch) | |
tree | 0a315a9a95ffae52cbe7b98a896cfc912d588f9b | |
parent | 2733fd6535cfd10c64ff8383bc1df890faaf076c (diff) | |
download | ghdl-9021ecbd3b9a457024d7cb4e6daa1322ecbbd611.tar.gz ghdl-9021ecbd3b9a457024d7cb4e6daa1322ecbbd611.tar.bz2 ghdl-9021ecbd3b9a457024d7cb4e6daa1322ecbbd611.zip |
synth: implement static physical integer div. Fix #1032.
-rw-r--r-- | src/synth/synth-static_oper.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-static_oper.adb b/src/synth/synth-static_oper.adb index e7d06cfe8..75803c607 100644 --- a/src/synth/synth-static_oper.adb +++ b/src/synth/synth-static_oper.adb @@ -234,7 +234,8 @@ package body Synth.Static_Oper is return Create_Value_Discrete (Boolean'Pos (Get_Static_Discrete (Left) /= Get_Static_Discrete (Right)), Boolean_Type); - when Iir_Predefined_Physical_Physical_Div => + when Iir_Predefined_Physical_Physical_Div + | Iir_Predefined_Physical_Integer_Div => return Create_Value_Discrete (Left.Scal / Right.Scal, Res_Typ); |