diff options
| -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 |