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.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-canon.adb b/src/vhdl/vhdl-canon.adb
index 487edfb44..1a4b99d40 100644
--- a/src/vhdl/vhdl-canon.adb
+++ b/src/vhdl/vhdl-canon.adb
@@ -1107,7 +1107,7 @@ package body Vhdl.Canon is
Res : Iir;
El, N_El : Iir;
begin
- Cond_Expr := Get_Conditional_Expression (Stmt);
+ Cond_Expr := Get_Conditional_Expression_Chain (Stmt);
Res := Create_Iir (Iir_Kind_If_Statement);
Set_Label (Res, Get_Label (Stmt));
Set_Suspend_Flag (Res, False);