diff options
Diffstat (limited to 'src/vhdl/translate/trans-chap7.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap7.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap7.adb b/src/vhdl/translate/trans-chap7.adb index 369e7564d..618ca996d 100644 --- a/src/vhdl/translate/trans-chap7.adb +++ b/src/vhdl/translate/trans-chap7.adb @@ -4527,7 +4527,7 @@ package body Trans.Chap7 is declare Info : constant Psl_Info_Acc := Get_Info (Expr); begin - return New_Value (Get_Var (Info.Psl_Count_Var)); + return New_Value (Get_Var (Info.Psl_Finish_Count_Var)); end; when others => |