1 files changed, 5 insertions, 0 deletions
diff --git a/cpukit/ada/rtems.ads b/cpukit/ada/rtems.ads
index 508f24046f..6c8ce3e5d4 100644
--- a/cpukit/ada/rtems.ads
+++ b/cpukit/ada/rtems.ads
@@ -864,6 +864,11 @@ package RTEMS is
       Result :    out RTEMS.Status_Codes
    );
 
+   procedure Task_Is_Suspended (
+      ID     : in     RTEMS.ID;
+      Result :    out RTEMS.Status_Codes
+   );
+
    procedure Task_Set_Priority (
       ID           : in     RTEMS.ID;
       New_Priority : in     RTEMS.Task_Priority;