diff options
| author | Arnaud Charlet <charlet@adacore.com> | 2021-09-23 06:04:41 -0400 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-10-05 08:20:06 +0000 |
| commit | 3a0302e07c4505933b59e7c4f687d24585ecc9f1 (patch) | |
| tree | 06876fc10ceaaa3ab6497e7f2d94a23f16aaa1c2 | |
| parent | 8ae054eaaee1cdd61c1d33c9d2e4744599c36794 (diff) | |
| download | gcc-3a0302e07c4505933b59e7c4f687d24585ecc9f1.zip gcc-3a0302e07c4505933b59e7c4f687d24585ecc9f1.tar.gz gcc-3a0302e07c4505933b59e7c4f687d24585ecc9f1.tar.bz2 | |
[Ada] Add comments in Ada.Task_Initialization
gcc/ada/
* libgnarl/a-tasini.ads (Set_Initialization_Handler): Update
comments.
| -rw-r--r-- | gcc/ada/libgnarl/a-tasini.ads | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/libgnarl/a-tasini.ads b/gcc/ada/libgnarl/a-tasini.ads index 2366145..a754c06 100644 --- a/gcc/ada/libgnarl/a-tasini.ads +++ b/gcc/ada/libgnarl/a-tasini.ads @@ -36,7 +36,11 @@ package Ada.Task_Initialization is type Initialization_Handler is access procedure; procedure Set_Initialization_Handler (Handler : Initialization_Handler); - -- Set the global task initialization handler to Handler + -- Set the global task initialization handler to Handler. + -- Note that only tasks created after this procedure is called will trigger + -- a call to Handler. You can use Ada's elaboration rules and pragma + -- Elaborate_All, or the pragma Linker_Constructor to ensure this + -- procedure is called early. private pragma Favor_Top_Level (Initialization_Handler); |