From 8f2cf93145595b8b4359767e5a7922a68af3495d Mon Sep 17 00:00:00 2001
From: Joel Sherrill <joel.sherrill@OARcorp.com>
Date: Thu, 21 Oct 1999 14:49:24 +0000
Subject: Added Semaphore_Flush.

---
 c/src/ada/rtems.ads | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'c/src/ada/rtems.ads')

diff --git a/c/src/ada/rtems.ads b/c/src/ada/rtems.ads
index 6c8ce3e5d4..08d8f2a894 100644
--- a/c/src/ada/rtems.ads
+++ b/c/src/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
-- 
cgit v1.2.3