diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-10-03 18:45:35 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-10-03 18:45:35 +0200 |
| commit | f392095b4ba018a4b3f0ef730610875c0681d233 (patch) | |
| tree | e0d8c408267f3791ac075e3f0193632407035cb5 /src/synth/synth-oper.adb | |
| parent | 3f83338c31520c0537477839bf3550a43650927f (diff) | |
| download | ghdl-f392095b4ba018a4b3f0ef730610875c0681d233.tar.gz ghdl-f392095b4ba018a4b3f0ef730610875c0681d233.tar.bz2 ghdl-f392095b4ba018a4b3f0ef730610875c0681d233.zip | |
synth-oper: handle non-constant integer divisions.
Diffstat (limited to 'src/synth/synth-oper.adb')
| -rw-r--r-- | src/synth/synth-oper.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/synth/synth-oper.adb b/src/synth/synth-oper.adb index 8bc84df49..13afb0ea8 100644 --- a/src/synth/synth-oper.adb +++ b/src/synth/synth-oper.adb @@ -665,8 +665,7 @@ package body Synth.Oper is (Left.Scal / Right.Scal, Get_Value_Type (Syn_Inst, Get_Type (Expr))); else - Error_Msg_Synth (+Expr, "non-constant division not supported"); - return null; + return Synth_Int_Dyadic (Id_Sdiv); end if; when Iir_Predefined_Integer_Mod => if Is_Const (Left) and then Is_Const (Right) then |