From 850614dae6db4ec205726d5bb392571c5dc5f126 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Tue, 5 Jan 2021 21:06:00 +0100 Subject: vhdl-parse_psl.adb: handle n_paren_prop in Psl_To_Vhdl --- src/vhdl/vhdl-parse_psl.adb | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/vhdl/vhdl-parse_psl.adb') diff --git a/src/vhdl/vhdl-parse_psl.adb b/src/vhdl/vhdl-parse_psl.adb index e50367648..30beb2a35 100644 --- a/src/vhdl/vhdl-parse_psl.adb +++ b/src/vhdl/vhdl-parse_psl.adb @@ -104,6 +104,10 @@ package body Vhdl.Parse_Psl is Res := Binary_Psl_Operator_To_Vhdl (N, Iir_Kind_And_Operator); when N_Or_Prop => Res := Binary_Psl_Operator_To_Vhdl (N, Iir_Kind_Or_Operator); + when N_Paren_Prop => + Res := Create_Iir (Iir_Kind_Parenthesis_Expression); + Set_Location (Res, Get_Location (N)); + Set_Expression (Res, Psl_To_Vhdl (Get_Property (N))); when others => Error_Msg_Parse (+N, "PSL construct not allowed as VHDL expression"); -- cgit v1.2.3