From 48396102d53ed1c10a750a14ff75364d5c533e10 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 18 Sep 2019 06:47:20 +0200 Subject: vhdl: add exit/next flags. --- src/vhdl/vhdl-nodes_meta.ads | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/vhdl/vhdl-nodes_meta.ads') diff --git a/src/vhdl/vhdl-nodes_meta.ads b/src/vhdl/vhdl-nodes_meta.ads index c9b5f7c30..7ff8f8e9e 100644 --- a/src/vhdl/vhdl-nodes_meta.ads +++ b/src/vhdl/vhdl-nodes_meta.ads @@ -296,6 +296,8 @@ package Vhdl.Nodes_Meta is Field_Parameter_Specification, Field_Parent, Field_Loop_Label, + Field_Exit_Flag, + Field_Next_Flag, Field_Component_Name, Field_Instantiation_List, Field_Entity_Aspect, @@ -832,6 +834,8 @@ package Vhdl.Nodes_Meta is function Has_Parameter_Specification (K : Iir_Kind) return Boolean; function Has_Parent (K : Iir_Kind) return Boolean; function Has_Loop_Label (K : Iir_Kind) return Boolean; + function Has_Exit_Flag (K : Iir_Kind) return Boolean; + function Has_Next_Flag (K : Iir_Kind) return Boolean; function Has_Component_Name (K : Iir_Kind) return Boolean; function Has_Instantiation_List (K : Iir_Kind) return Boolean; function Has_Entity_Aspect (K : Iir_Kind) return Boolean; -- cgit v1.2.3