aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/s-taprob.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-taprob.adb')
-rw-r--r--gcc/ada/s-taprob.adb4
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/s-taprob.adb b/gcc/ada/s-taprob.adb
index 14d1d7d..cd762c7 100644
--- a/gcc/ada/s-taprob.adb
+++ b/gcc/ada/s-taprob.adb
@@ -241,7 +241,9 @@ package body System.Tasking.Protected_Objects is
end Unlock;
begin
- -- Ensure that tasking soft links are set when using protected objects
+ -- Ensure that tasking is initialized, as well as tasking soft links
+ -- when using protected objects.
+ Tasking.Initialize;
System.Soft_Links.Tasking.Init_Tasking_Soft_Links;
end System.Tasking.Protected_Objects;