Searched refs:New_Val (Results 1 – 25 of 295) sorted by last modified time
12345678910>>...12
/dports/lang/gnat_util/gnat_util/ |
H A D | table.ads | 165 procedure Set_Last (New_Val : Table_Index_Type); 182 procedure Append (New_Val : Table_Component_Type);
|
H A D | table.adb | 81 procedure Append (New_Val : Table_Component_Type) is 83 Set_Item (Table_Index_Type (Last_Val + 1), New_Val); 357 procedure Set_Last (New_Val : Table_Index_Type) is 359 if Int (New_Val) < Last_Val then 360 Last_Val := Int (New_Val); 363 Last_Val := Int (New_Val);
|
H A D | makeutl.adb | 2582 Q.Append (New_Val => (Info => Source, Processed => False));
|
H A D | fname-uf.adb | 536 SFN_Patterns.Append (New_Val => 542 SFN_Patterns.Append (New_Val =>
|
H A D | errutil.adb | 205 (New_Val => 618 (New_Val =>
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | make_util.adb | 896 Q.Append (New_Val => (Info => Source, Processed => False));
|
H A D | sem_prag.adb | 32739 (New_Val => CTWE_Entry'(Eloc => Sloc (Arg1),
|
H A D | table.adb | 70 procedure Append (New_Val : Table_Component_Type) is 73 Set_Item (Table_Index_Type (Last_Val + 1), New_Val); 376 procedure Set_Last (New_Val : Table_Index_Type) is 378 pragma Assert (Int (New_Val) <= Last_Val or else not Locked); 380 if Int (New_Val) < Last_Val then 381 Last_Val := Int (New_Val); 384 Last_Val := Int (New_Val);
|
H A D | table.ads | 170 procedure Set_Last (New_Val : Table_Index_Type); 187 procedure Append (New_Val : Table_Component_Type);
|
H A D | sem_ch13.adb | 17520 (New_Val => UC_Entry'(Eloc => Sloc (N),
|
H A D | errutil.adb | 205 (New_Val => 631 (New_Val =>
|
H A D | exp_disp.adb | 5203 New_Val : String_Id; variable 5231 New_Val := Old_Val; 5235 New_Val := End_String; 5248 Make_String_Literal (Loc, New_Val)));
|
H A D | fname-uf.adb | 533 SFN_Patterns.Append (New_Val => 539 SFN_Patterns.Append (New_Val =>
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/libgnat/ |
H A D | g-table.ads | 97 procedure Set_Last (New_Val : Table_Last_Type); 106 procedure Append (New_Val : Table_Component_Type);
|
H A D | g-dyntab.adb | 71 procedure Append (T : in out Instance; New_Val : Table_Component_Type) is 81 T.Table (New_Last) := New_Val; 84 Set_Item (T, New_Last, New_Val); 413 procedure Set_Last (T : in out Instance; New_Val : Table_Last_Type) is 416 if New_Val > Last_Allocated (T) then 417 Grow (T, New_Val); 420 T.P.Last := New_Val;
|
H A D | g-dyntab.ads | 215 procedure Set_Last (T : in out Instance; New_Val : Table_Last_Type); 232 procedure Append (T : in out Instance; New_Val : Table_Component_Type);
|
H A D | g-table.adb | 57 procedure Append (New_Val : Table_Component_Type) is 59 Tab.Append (The_Instance, New_Val); 190 procedure Set_Last (New_Val : Table_Last_Type) is 192 Tab.Set_Last (The_Instance, New_Val);
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | errutil.adb | 205 (New_Val => 631 (New_Val =>
|
H A D | exp_disp.adb | 5386 New_Val : String_Id; variable 5414 New_Val := Old_Val; 5418 New_Val := End_String; 5431 Make_String_Literal (Loc, New_Val)));
|
H A D | table.adb | 70 procedure Append (New_Val : Table_Component_Type) is 73 Set_Item (Table_Index_Type (Last_Val + 1), New_Val); 376 procedure Set_Last (New_Val : Table_Index_Type) is 378 pragma Assert (Int (New_Val) <= Last_Val or else not Locked); 380 if Int (New_Val) < Last_Val then 381 Last_Val := Int (New_Val); 384 Last_Val := Int (New_Val);
|
H A D | table.ads | 170 procedure Set_Last (New_Val : Table_Index_Type); 187 procedure Append (New_Val : Table_Component_Type);
|
H A D | sem_ch13.adb | 16586 (New_Val => UC_Entry'(Eloc => Sloc (N),
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/libgnat/ |
H A D | g-dyntab.ads | 215 procedure Set_Last (T : in out Instance; New_Val : Table_Last_Type); 232 procedure Append (T : in out Instance; New_Val : Table_Component_Type);
|
H A D | g-dyntab.adb | 71 procedure Append (T : in out Instance; New_Val : Table_Component_Type) is 81 T.Table (New_Last) := New_Val; 84 Set_Item (T, New_Last, New_Val); 413 procedure Set_Last (T : in out Instance; New_Val : Table_Last_Type) is 416 if New_Val > Last_Allocated (T) then 417 Grow (T, New_Val); 420 T.P.Last := New_Val;
|
H A D | g-table.ads | 95 procedure Set_Last (New_Val : Table_Last_Type); 104 procedure Append (New_Val : Table_Component_Type);
|
12345678910>>...12