From 05d5772c1c194bec54bef65136ddecd18cd30d25 Mon Sep 17 00:00:00 2001 From: Sebastian Huber Date: Wed, 19 Aug 2020 06:47:38 +0200 Subject: ada: Add missing attributes --- cpukit/include/adainclude/rtems.ads | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'cpukit') diff --git a/cpukit/include/adainclude/rtems.ads b/cpukit/include/adainclude/rtems.ads index 5069c36011..0b4b3e7e5f 100644 --- a/cpukit/include/adainclude/rtems.ads +++ b/cpukit/include/adainclude/rtems.ads @@ -201,6 +201,15 @@ pragma Elaborate_Body (RTEMS); Inherit_Priority : constant RTEMS.Attribute := 16#00000040#; No_Priority_Ceiling : constant RTEMS.Attribute := 16#00000000#; Priority_Ceiling : constant RTEMS.Attribute := 16#00000080#; + No_Multiprocessor_Resource_Sharing + : constant RTEMS.Attribute := 16#00000000#; + Multiprocessor_Resource_Sharing + : constant RTEMS.Attribute := 16#00000100#; + Barrier_Manual_Release : constant RTEMS.Attribute := 16#00000000#; + Barrier_Automatic_Release + : constant RTEMS.Attribute := 16#00000200#; + Application_Task : constant RTEMS.Attribute := 16#00000000#; + System_Task : constant RTEMS.Attribute := 16#00008000#; function Interrupt_Level ( Level : in RTEMS.Unsigned32 -- cgit v1.2.3