diff options
Diffstat (limited to 'gcc/ada/exp_disp.ads')
| -rw-r--r-- | gcc/ada/exp_disp.ads | 32 |
1 files changed, 14 insertions, 18 deletions
diff --git a/gcc/ada/exp_disp.ads b/gcc/ada/exp_disp.ads index 306cec2..9943bda 100644 --- a/gcc/ada/exp_disp.ads +++ b/gcc/ada/exp_disp.ads @@ -52,65 +52,61 @@ package Exp_Disp is -- type. Constructs of the form Prefix'Size are converted into -- Prefix._Size. - -- _Alignment (2) - implementation of the attribute 'Alignment for - -- any tagged type. Constructs of the form Prefix'Alignment are - -- converted into Prefix._Alignment. - - -- TSS_Stream_Read (3) - implementation of the stream attribute Read + -- TSS_Stream_Read (2) - implementation of the stream attribute Read -- for any tagged type. - -- TSS_Stream_Write (4) - implementation of the stream attribute Write + -- TSS_Stream_Write (3) - implementation of the stream attribute Write -- for any tagged type. - -- TSS_Stream_Input (5) - implementation of the stream attribute Input + -- TSS_Stream_Input (4) - implementation of the stream attribute Input -- for any tagged type. - -- TSS_Stream_Output (6) - implementation of the stream attribute + -- TSS_Stream_Output (5) - implementation of the stream attribute -- Output for any tagged type. - -- Op_Eq (7) - implementation of the equality operator for any non- + -- Op_Eq (6) - implementation of the equality operator for any non- -- limited tagged type. - -- _Assign (8) - implementation of the assignment operator for any + -- _Assign (7) - implementation of the assignment operator for any -- non-limited tagged type. - -- TSS_Deep_Adjust (9) - implementation of the finalization operation + -- TSS_Deep_Adjust (8) - implementation of the finalization operation -- Adjust for any non-limited tagged type. - -- TSS_Deep_Finalize (10) - implementation of the finalization + -- TSS_Deep_Finalize (9) - implementation of the finalization -- operation Finalize for any non-limited tagged type. - -- _Disp_Asynchronous_Select (11) - used in the expansion of ATC with + -- _Disp_Asynchronous_Select (10) - used in the expansion of ATC with -- dispatching triggers. Null implementation for limited interfaces, -- full body generation for types that implement limited interfaces, -- not generated for the rest of the cases. See Expand_N_Asynchronous_ -- Select in Exp_Ch9 for more information. - -- _Disp_Conditional_Select (12) - used in the expansion of conditional + -- _Disp_Conditional_Select (11) - used in the expansion of conditional -- selects with dispatching triggers. Null implementation for limited -- interfaces, full body generation for types that implement limited -- interfaces, not generated for the rest of the cases. See Expand_N_ -- Conditional_Entry_Call in Exp_Ch9 for more information. - -- _Disp_Get_Prim_Op_Kind (13) - helper routine used in the expansion + -- _Disp_Get_Prim_Op_Kind (12) - helper routine used in the expansion -- of ATC with dispatching triggers. Null implementation for limited -- interfaces, full body generation for types that implement limited -- interfaces, not generated for the rest of the cases. - -- _Disp_Get_Task_Id (14) - helper routine used in the expansion of + -- _Disp_Get_Task_Id (13) - helper routine used in the expansion of -- Abort, attributes 'Callable and 'Terminated for task interface -- class-wide types. Full body generation for task types, null -- implementation for limited interfaces, not generated for the rest -- of the cases. See Expand_N_Attribute_Reference in Exp_Attr and -- Expand_N_Abort_Statement in Exp_Ch9 for more information. - -- _Disp_Requeue (15) - used in the expansion of dispatching requeue + -- _Disp_Requeue (14) - used in the expansion of dispatching requeue -- statements. Null implementation is provided for protected, task -- and synchronized interfaces. Protected and task types implementing -- concurrent interfaces receive full bodies. See Expand_N_Requeue_ -- Statement in Exp_Ch9 for more information. - -- _Disp_Timed_Select (16) - used in the expansion of timed selects + -- _Disp_Timed_Select (15) - used in the expansion of timed selects -- with dispatching triggers. Null implementation for limited -- interfaces, full body generation for types that implement limited -- interfaces, not generated for the rest of the cases. See Expand_N_ |