From 87e951a21def3fc4d95b577c8f30f708853bc16a Mon Sep 17 00:00:00 2001
From: Joel Sherrill <joel.sherrill@OARcorp.com>
Date: Tue, 3 Jun 1997 16:04:00 +0000
Subject: Added RTEMS boolean constants.

---
 cpukit/ada/rtems.ads | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'cpukit/ada')

diff --git a/cpukit/ada/rtems.ads b/cpukit/ada/rtems.ads
index 46d5fe4982..0af1e4b488 100644
--- a/cpukit/ada/rtems.ads
+++ b/cpukit/ada/rtems.ads
@@ -69,6 +69,9 @@ package RTEMS is
    Null_Address     : constant RTEMS.Address :=
       System.Storage_Elements.To_Address(0);
 
+   True  : constant RTEMS.Boolean := 1;
+   False : constant RTEMS.Boolean := 0;
+
    --  More Types
    --
 
-- 
cgit v1.2.3