diff options
Diffstat (limited to 'src/vhdl/vhdl-nodes.ads')
| -rw-r--r-- | src/vhdl/vhdl-nodes.ads | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads index 688c30555..3c3ef8241 100644 --- a/src/vhdl/vhdl-nodes.ads +++ b/src/vhdl/vhdl-nodes.ads @@ -2848,6 +2848,8 @@ package Vhdl.Nodes is -- -- Get/Set_Delay_Mechanism (Flag1) -- + -- Get/Set_Has_Delay_Mechanism (Flag2) + -- -- Get/Set_Postponed_Flag (Flag3) -- -- Get/Set_Visible_Flag (Flag4) @@ -3388,6 +3390,8 @@ package Vhdl.Nodes is -- -- Get/Set_Delay_Mechanism (Flag1) -- + -- Get/Set_Has_Delay_Mechanism (Flag2) + -- -- Get/Set_Visible_Flag (Flag4) -- -- True if the target of the assignment is guarded @@ -7870,6 +7874,13 @@ package Vhdl.Nodes is function Get_Has_Class (Decl : Iir) return Boolean; procedure Set_Has_Class (Decl : Iir; Flag : Boolean); + -- Layout flag for signal assignment. If True, the delay mechanism is + -- present. This is obviously true for transport or inertial with reject, + -- but the simple 'inertial' is optional. + -- Field: Flag2 + function Get_Has_Delay_Mechanism (Stmt : Iir) return Boolean; + procedure Set_Has_Delay_Mechanism (Stmt : Iir; Flag : Boolean); + -- Set on wait, procedure call and composite statements when there is a -- sub-statement that can suspend a procedure or a process. Also set -- on procedure declaration. Note that the flag is conservative: it must |