1 files changed, 4 insertions, 0 deletions
diff --git a/cpukit/ada/rtems.ads b/cpukit/ada/rtems.ads
index 6c8ce3e5d4..08d8f2a894 100644
--- a/cpukit/ada/rtems.ads
+++ b/cpukit/ada/rtems.ads
@@ -1058,6 +1058,10 @@ package RTEMS is
       Result :    out RTEMS.Status_Codes
    );
 
+   procedure Semaphore_Flush (
+      ID     : in     RTEMS.ID;
+      Result :    out RTEMS.Status_Codes
+   );
 
    --
    --  Message Queue Manager