Changeset 81b329a in rtems


Ignore:
Timestamp:
Jul 2, 2008, 3:28:54 PM (12 years ago)
Author:
Ralf Corsepius <ralf.corsepius@…>
Branches:
4.10, 4.11, 4.9, master
Children:
9aacd70
Parents:
9a9851dd
Message:

Support rtems_ada_self iff RTEMS_ADA is given.

Location:
cpukit/score
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • cpukit/score/include/rtems/score/thread.h

    r9a9851dd r81b329a  
    332332  /** This field is true if the thread is preemptible. */
    333333  boolean                               is_preemptible;
     334#if __RTEMS_ADA__
    334335  /** This field is the GNAT self context pointer. */
    335336  void                                 *rtems_ada_self;
     337#endif
    336338  /** This field is the length of the time quantum that this thread is
    337339   *  allowed to consume.  The algorithm used to manage limits on CPU usage
  • cpukit/score/src/threaddispatch.c

    r9a9851dd r81b329a  
    9494    _Context_Switch_necessary = FALSE;
    9595    _Thread_Executing = heir;
     96#if __RTEMS_ADA__
    9697    executing->rtems_ada_self = rtems_ada_self;
    9798    rtems_ada_self = heir->rtems_ada_self;
     99#endif
    98100    if ( heir->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE )
    99101      heir->cpu_time_budget = _Thread_Ticks_per_timeslice;
  • cpukit/score/src/threadinitialize.c

    r9a9851dd r81b329a  
    6464  boolean              extension_status;
    6565
     66#if __RTEMS_ADA__
    6667  /*
    6768   *  Initialize the Ada self pointer
     
    6970
    7071  the_thread->rtems_ada_self = NULL;
     72#endif
    7173
    7274  /*
Note: See TracChangeset for help on using the changeset viewer.