From 9ed2199d83ebf4beaca2d6381c9f552165b8ba5f Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 6 Sep 2017 05:31:29 +0200 Subject: Also fix crash for assert statement For #407 --- src/vhdl/canon.adb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/vhdl/canon.adb b/src/vhdl/canon.adb index d2c3cc8c3..39f83e712 100644 --- a/src/vhdl/canon.adb +++ b/src/vhdl/canon.adb @@ -360,9 +360,9 @@ package body Canon is -- resulting sets. Canon_Extract_Sensitivity (Get_Assertion_Condition (Stmt), List); - Canon_Extract_Sensitivity + Canon_Extract_Sensitivity_If_Not_Null (Get_Severity_Expression (Stmt), List); - Canon_Extract_Sensitivity + Canon_Extract_Sensitivity_If_Not_Null (Get_Report_Expression (Stmt), List); when Iir_Kind_Report_Statement => -- LRM08 11.3 -- cgit v1.2.3