Home
last modified time | relevance | path

Searched refs:Type_Def (Results 1 – 25 of 196) sorted by relevance

12345678

/dports/devel/ada-util/ada-util-b6612400/src/
H A Dutil-beans-objects.adb104 pragma Unreferenced (Type_Def);
113 pragma Unreferenced (Type_Def);
146 pragma Unreferenced (Type_Def);
155 pragma Unreferenced (Type_Def);
165 pragma Unreferenced (Type_Def);
181 pragma Unreferenced (Type_Def);
191 pragma Unreferenced (Type_Def);
201 pragma Unreferenced (Type_Def);
806 return Value.Type_Def;
1395 Result.Type_Def := Left.Type_Def;
[all …]
H A Dutil-beans-objects.ads98 function To_String (Type_Def : in Object_Type;
114 function To_Boolean (Type_Def : in Object_Type;
122 function Is_Empty (Type_Def : in Object_Type;
250 function Is_Empty (Type_Def : in Basic_Type;
265 function To_String (Type_Def : in Null_Type;
269 function Is_Empty (Type_Def : in Null_Type;
283 function To_String (Type_Def : in Int_Type;
295 function To_Boolean (Type_Def : in Int_Type;
299 function To_Duration (Type_Def : in Int_Type;
477 function To_String (Type_Def : in Bean_Type;
[all …]
H A Dutil-beans-objects-time.adb39 function Get_Name (Type_Def : Time_Type_Def) return String;
42 function To_String (Type_Def : in Time_Type_Def;
50 function Get_Name (Type_Def : in Time_Type_Def) return String is
51 pragma Unreferenced (Type_Def);
59 function To_String (Type_Def : in Time_Type_Def;
61 pragma Unreferenced (Type_Def);
74 Type_Def => Time_Type'Access);
89 T : constant String := Value.Type_Def.To_String (Value.V);
115 return Time.To_Object (Formatting.Value (Value.Type_Def.To_String (Value.V)));
H A Dutil-beans-objects-records.adb29 function Get_Name (Type_Def : in Record_Bean_Type) return String;
32 function To_Boolean (Type_Def : in Record_Bean_Type;
38 function Get_Name (Type_Def : in Record_Bean_Type) return String is
39 pragma Unreferenced (Type_Def);
47 function To_Boolean (Type_Def : in Record_Bean_Type;
49 pragma Unreferenced (Type_Def);
65 Type_Def => Bn_Type'Access);
77 Type_Def => Bn_Type'Access);
H A Dutil-beans-objects-enums.adb32 function Get_Name (Type_Def : in Enum_Type) return String;
35 function To_String (Type_Def : in Enum_Type;
43 function Get_Name (Type_Def : Enum_Type) return String is
44 pragma Unreferenced (Type_Def);
53 function To_String (Type_Def : in Enum_Type;
55 pragma Unreferenced (Type_Def);
70 Type_Def => Value_Type'Access);
/dports/lang/adacontrol/adactl-1.18r9/src/
H A Drules-derivations.adb214 Type_Def : Asis.Definition; variable
266 Type_Def := Type_Declaration_View (Corresponding_First_Subtype (Type_Decl));
267 …if Type_Kind (Type_Def) in A_Derived_Type_Definition .. A_Derived_Record_Extension_De…
268 or else Formal_Type_Kind (Type_Def) = A_Formal_Derived_Type_Definition
273 if Type_Kind (Type_Def) = A_Derived_Record_Extension_Definition
274 or else Type_Kind (Type_Def) = An_Interface_Type_Definition
275 or else Formal_Type_Kind (Type_Def) = A_Formal_Derived_Type_Definition
278 Progenitors : constant Asis.Expression_List := Definition_Interface_List (Type_Def);
/dports/lang/asis/asis-gpl-2016-src/asis/
H A Da4g-mapping.ads328 procedure Set_Inherited_Discriminants (Type_Def : Asis.Element);
338 (Type_Def : Asis.Element;
352 (Type_Def : Asis.Element;
357 procedure Set_Inherited_Literals (Type_Def : Asis.Element);
H A Dasis-data_decomposition-aux.adb792 function Root_Array_Definition (Type_Def : Element) return Element is
793 Result : Element := Type_Def;
796 if Is_Derived_From_Array (Type_Def) then
797 Result := Corresponding_Root_Type (Type_Def);
809 function Root_Record_Definition (Type_Def : Element) return Element is
810 Result : Element := Type_Def;
813 if Is_Derived_From_Record (Type_Def) then
814 Result := Corresponding_Root_Type (Type_Def);
H A Dasis-data_decomposition.adb1199 Type_Def : Asis.Element; variable
1214 Type_Def := Asis.Definitions.Subtype_Mark (Type_Def);
1215 Type_Def := Type_Definition_From_Subtype_Mark (Type_Def);
1220 Set_Parent_Type_Definition (Type_Def);
1260 Type_Def : Asis.Element; variable
1274 Type_Def := Component_Declaration (Component);
1276 Type_Def := Object_Declaration_View (Type_Def);
1277 Type_Def := Asis.Definitions.Component_Subtype_Indication (Type_Def);
1278 Type_Def := Asis.Definitions.Subtype_Mark (Type_Def);
1279 Type_Def := Type_Definition_From_Subtype_Mark (Type_Def);
[all …]
H A Dasis-data_decomposition-aux.ads116 function Root_Record_Definition (Type_Def : Element) return Element;
117 function Root_Array_Definition (Type_Def : Element) return Element;
/dports/lang/asis/asis-gpl-2016-src/tools/gnatcheck/
H A Dgnatcheck-asis_utilities.adb585 Type_Def : Asis.Element; variable
1019 Type_Def : Asis.Element; variable
1070 Type_Def : Asis.Element; variable
1104 Type_Def := Discriminant_Part (El);
1110 Discriminants (Type_Def);
1123 Type_Def := Type_Declaration_View (El);
1125 case Flat_Element_Kind (Type_Def) is
1130 Private_Part_Items (Type_Def);
1171 if Asis.Elements.Type_Kind (Type_Def) =
1178 Type_Def := Asis.Definitions.Record_Definition (Type_Def);
[all …]
H A Dgnatcheck-rules-custom_2.adb440 Type_Def : Asis.Element := Nil_Element; variable
445 Type_Def := Type_Declaration_View (Element);
448 if Type_Kind (Type_Def) = A_Derived_Record_Extension_Definition
450 Type_Kind (Type_Def) = A_Tagged_Record_Type_Definition
452 Type_Kind (Type_Def) = An_Interface_Type_Definition
454 Depth := Inheritance_Depth (Type_Def);
1301 Type_Def : Asis.Element; variable
1305 Type_Def := Type_Declaration_View (Element);
1307 case Type_Kind (Type_Def) is
1315 (Corresponding_Root_Type (Type_Def))) =
/dports/cad/ghdl/ghdl-1.0.0/src/vhdl/
H A Dvhdl-ieee-std_logic_arith.adb419 Type_Def : Iir; variable
465 Type_Def := Get_Type_Definition (Decl);
466 if Get_Kind (Type_Def) /= Iir_Kind_Array_Type_Definition then
469 Unsigned_Type := Type_Def;
481 Type_Def := Get_Type_Definition (Decl);
482 if Get_Kind (Type_Def) /= Iir_Kind_Array_Type_Definition then
485 Signed_Type := Type_Def;
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gnat.dg/
H A Dpredicate2_main.adb6 Type_Def : Predicate2.Project.Typ.Object := Predicate2.Project.Typ.Undefined; variable
9 Type_Def := Types ("toto");
/dports/lang/asis/asis-gpl-2016-src/tools/tool_utils/
H A Dasis_ul-utilities.adb874 (Type_Def : Asis.Element)
891 if not Can_Have_Dispatching_Operations (Type_Def) then
894 Wrong_Kind => Int_Kind (Type_Def));
897 Type_Node := Node (Enclosing_Element (Type_Def));
947 (Encl_Cont_Id (Type_Def),
950 if Is_From_Instance (Type_Def) then
1680 if Asis.Elements.Type_Kind (Type_Def) =
1683 Parent_Type_Def := Parent_Subtype_Indication (Type_Def);
1703 if Asis.Elements.Type_Kind (Type_Def) =
1718 Definition_Interface_List (Type_Def);
[all …]
H A Dada_trees.adb499 Type_Def : constant Name_Id := constant
508 if Contains (Symtab, Type_Def) then
509 Result := Symtab (Type_Def).Def_Id;
530 Type_Def : constant Name_Id := constant
539 if Contains (Symtab, Type_Def) then
540 Result := Symtab (Type_Def).Def_Id;

12345678