Home
last modified time | relevance | path

Searched refs:Decl_Kind (Results 1 – 15 of 15) sorted by relevance

/dports/lang/asis/asis-gpl-2016-src/asis/
H A Dasis-declarations.adb798 Wrong_Kind => Decl_Kind);
1448 Decl_Kind := Int_Kind (Declaration);
1460 Wrong_Kind => Decl_Kind);
1477 case Decl_Kind is
1580 Decl_Kind := Int_Kind (Declaration);
1599 Wrong_Kind => Decl_Kind);
1604 case Decl_Kind is
2707 Decl_Kind := Int_Kind (Declaration);
2732 Wrong_Kind => Decl_Kind);
2818 Decl_Kind := Int_Kind (Declaration);
[all …]
/dports/lang/adacontrol/adactl-1.18r9/src/
H A Drules-naming_convention.adb685 Decl_Kind : Asis.Declaration_Kinds; variable
731 Decl_Kind := Declaration_Kind (Decl);
734 if Decl_Kind in A_Full_Type_Declaration
753 case Decl_Kind is
756 case A_Renaming_Declaration (Decl_Kind) is
840 Decl_Kind := A_Package_Declaration;
888 Decl_Kind := Declaration_Kind (Decl);
893 Decl_Kind := Declaration_Kind (Decl);
906 Decl_Kind := Declaration_Kind (Decl);
919 case Decl_Kind is
[all …]
H A Drules-declarations.adb266 Decl_Kind : constant Asis.Declaration_Kinds := Declaration_Kind (Elem); constant
270 if Decl_Kind in A_Variable_Declaration .. A_Deferred_Constant_Declaration
271 or Decl_Kind in A_Discriminant_Specification .. A_Component_Declaration
H A Drules-usage.adb1504 Decl_Kind : constant Asis.Declaration_Kinds constant
1509 case Decl_Kind is
/dports/lang/asis/asis-gpl-2016-src/tools/tool_utils/
H A Dada_trees-asis_to_tree.adb64 function Decl_Kind (Def_Id : Defining_Name) return String; subprogspec
136 function Decl_Kind (Def_Id : Defining_Name) return String is subprogram
147 end Decl_Kind; argument
230 return "ada://" & Decl_Kind (Def_Id) & "/" & Unique_Id (Def_Id);
428 Decl_Kind : constant Flat_Declaration_Kinds := constant
431 Result.Decl_Kind := Decl_Kind;
450 Result.Decl_Kind := An_Unknown_Attribute;
H A Dada_trees.ads173 Decl_Kind : Opt_ASIS_Elems := Not_An_Element; component
H A Dada_trees-formatting-tree_to_ada.adb3357 Tree.Decl_Kind,
/dports/lang/asis/asis-gpl-2016-src/tools/gnat2xml/test/
H A Dvatox-traversal.adb269 Decl_Kind : Declaration_Kinds := Elements.Declaration_Kind(Elem); variable
271 return ((Decl_Kind = A_Package_Declaration) or
272 (Decl_Kind = A_Package_Renaming_Declaration))
1089 Decl_Kind : Asis.Declaration_Kinds; variable
1100 Decl_Kind := Declaration_Kind (Parent);
1101 case Decl_Kind is
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/
H A Dcontracts.adb777 function Decl_Kind (Is_Type : Boolean; subprogspec
785 function Decl_Kind (Is_Type : Boolean; subprogram
793 end Decl_Kind;
922 & Decl_Kind (Is_Type => Is_Type_Id,
935 & Decl_Kind (Is_Type => Is_Type_Id,
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/
H A Dcontracts.adb777 function Decl_Kind (Is_Type : Boolean; subprogspec
785 function Decl_Kind (Is_Type : Boolean; subprogram
793 end Decl_Kind;
922 & Decl_Kind (Is_Type => Is_Type_Id,
935 & Decl_Kind (Is_Type => Is_Type_Id,
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/
H A Dcontracts.adb777 function Decl_Kind (Is_Type : Boolean; subprogspec
785 function Decl_Kind (Is_Type : Boolean; subprogram
793 end Decl_Kind;
922 & Decl_Kind (Is_Type => Is_Type_Id,
935 & Decl_Kind (Is_Type => Is_Type_Id,
/dports/lang/asis/asis-gpl-2016-src/tools/gnattest/
H A Dgnattest-skeleton-generator-gather_data.adb3257 Decl_Kind : Declaration_Kinds; variable
3264 Decl_Kind := Declaration_Kind (Corresp_Decl);
3268 Decl_Kind = A_Private_Type_Declaration or else
3269 Decl_Kind = An_Incomplete_Type_Declaration or else
3270 Decl_Kind = A_Tagged_Incomplete_Type_Declaration
/dports/lang/asis/asis-gpl-2016-src/tools/gnatcheck/
H A Dgnatcheck-rules-default.adb988 Decl_Kind : constant Declaration_Kinds := Declaration_Kind (Element); constant
995 if Decl_Kind = A_Package_Declaration
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/
H A Dcontracts.adb790 Decl_Kind : constant String := constant
918 & Decl_Kind
929 ("discriminated " & Decl_Kind & " & cannot be volatile",
H A DChangeLog3808 with "object" in error messages; replace Decl_Kind with a local