diff options
Diffstat (limited to 'src/vhdl')
| -rw-r--r-- | src/vhdl/vhdl-canon.adb | 6 | ||||
| -rw-r--r-- | src/vhdl/vhdl-nodes.ads | 4 |
2 files changed, 6 insertions, 4 deletions
diff --git a/src/vhdl/vhdl-canon.adb b/src/vhdl/vhdl-canon.adb index 8e4bfd588..cad575929 100644 --- a/src/vhdl/vhdl-canon.adb +++ b/src/vhdl/vhdl-canon.adb @@ -1397,11 +1397,13 @@ package body Vhdl.Canon is case Get_Kind (Stmt) is when Iir_Kind_Simple_Signal_Assignment_Statement - | Iir_Kind_Conditional_Signal_Assignment_Statement => + | Iir_Kind_Conditional_Signal_Assignment_Statement + | Iir_Kind_Signal_Force_Assignment_Statement + | Iir_Kind_Signal_Release_Assignment_Statement => null; when Iir_Kind_Variable_Assignment_Statement - | Iir_Kind_Conditional_Variable_Assignment_Statement => + | Iir_Kind_Conditional_Variable_Assignment_Statement => null; when Iir_Kind_If_Statement => diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads index 2fa4d6aaf..f16d7302b 100644 --- a/src/vhdl/vhdl-nodes.ads +++ b/src/vhdl/vhdl-nodes.ads @@ -5345,8 +5345,8 @@ package Vhdl.Nodes is type Iir_Force_Mode is ( - Iir_Force_In, - Iir_Force_Out + Iir_Force_In, -- Effective + Iir_Force_Out -- Driving ); -- LRM93 2.7 (conformance rules). |