/dports/lang/asis/asis-gpl-2016-src/asis/ |
H A D | asis-declarations.adb | 798 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 D | rules-naming_convention.adb | 685 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 D | rules-declarations.adb | 266 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 D | rules-usage.adb | 1504 Decl_Kind : constant Asis.Declaration_Kinds constant 1509 case Decl_Kind is
|
/dports/lang/asis/asis-gpl-2016-src/tools/tool_utils/ |
H A D | ada_trees-asis_to_tree.adb | 64 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 D | ada_trees.ads | 173 Decl_Kind : Opt_ASIS_Elems := Not_An_Element; component
|
H A D | ada_trees-formatting-tree_to_ada.adb | 3357 Tree.Decl_Kind,
|
/dports/lang/asis/asis-gpl-2016-src/tools/gnat2xml/test/ |
H A D | vatox-traversal.adb | 269 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 D | contracts.adb | 777 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 D | contracts.adb | 777 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 D | contracts.adb | 777 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 D | gnattest-skeleton-generator-gather_data.adb | 3257 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 D | gnatcheck-rules-default.adb | 988 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 D | contracts.adb | 790 Decl_Kind : constant String := constant 918 & Decl_Kind 929 ("discriminated " & Decl_Kind & " & cannot be volatile",
|
H A D | ChangeLog | 3808 with "object" in error messages; replace Decl_Kind with a local
|