aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-canon.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-canon.adb')
-rw-r--r--src/vhdl/vhdl-canon.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-canon.adb b/src/vhdl/vhdl-canon.adb
index 95f531cf8..8e4bfd588 100644
--- a/src/vhdl/vhdl-canon.adb
+++ b/src/vhdl/vhdl-canon.adb
@@ -362,6 +362,7 @@ package body Vhdl.Canon is
begin
We := Chain;
while We /= Null_Iir loop
+ exit when Get_Kind (We) = Iir_Kind_Unaffected_Waveform;
Canon_Extract_Sensitivity_Expression (Get_We_Value (We), List);
Canon_Extract_Sensitivity_If_Not_Null (Get_Time (We), List);
We := Get_Chain (We);