diff options
Diffstat (limited to 'src/vhdl/canon.adb')
| -rw-r--r-- | src/vhdl/canon.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/canon.adb b/src/vhdl/canon.adb index 0304aea9a..a444ab12c 100644 --- a/src/vhdl/canon.adb +++ b/src/vhdl/canon.adb @@ -129,7 +129,8 @@ package body Canon is Canon_Extract_Sensitivity (Get_Prefix (Expr), Sensitivity_List, Is_Target); Suff := Get_Suffix (Expr); - if Get_Kind (Suff) not in Iir_Kinds_Scalar_Type_Definition + if Get_Kind (Suff) + not in Iir_Kinds_Scalar_Type_And_Subtype_Definition then Canon_Extract_Sensitivity (Suff, Sensitivity_List, False); |