diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/synth/synth-stmts.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb index 88501a684..30c80c0ef 100644 --- a/src/synth/synth-stmts.adb +++ b/src/synth/synth-stmts.adb @@ -667,6 +667,7 @@ package body Synth.Stmts is begin Cond_Val := Synth_Expression (C.Inst, Cond); if Is_Static (Cond_Val) then + Strip_Const (Cond_Val); if Cond_Val.Scal = 1 then -- True. Synth_Sequential_Statements |