[PATCH] ada: Add missing attributes

[Joel Sherrill]

On Wed, Aug 19, 2020, 12:20 PM Gedare Bloom <gedare at rtems.org> wrote:

> Looks good. I forgot about these with the barrier change... I guess
> there has been some bitrot in here. I wonder if there is an easier way
> to remember to keep this updated.
>

I don't know. The binding and tests are derived from the old Ada
implementation. It is only for the Classic API bindings. Ada tasking uses
POSIX threads.

That all leads up to wondering what Classic APIs might be missing.

--joel


> On Tue, Aug 18, 2020 at 10:49 PM Sebastian Huber
> <sebastian.huber at embedded-brains.de> wrote:
> >
> > ---
> >  cpukit/include/adainclude/rtems.ads | 9 +++++++++
> >  1 file changed, 9 insertions(+)
> >
> > 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
> > --
> > 2.26.2
> >
> > _______________________________________________
> > devel mailing list
> > devel at rtems.org
> > http://lists.rtems.org/mailman/listinfo/devel
> _______________________________________________
> devel mailing list
> devel at rtems.org
> http://lists.rtems.org/mailman/listinfo/devel
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.rtems.org/pipermail/devel/attachments/20200819/0440750c/attachment.html>