From 81b329a94f1bc2bcd0c3fb3e93f4d74c37fddcec Mon Sep 17 00:00:00 2001 From: Ralf Corsepius Date: Wed, 2 Jul 2008 15:28:54 +0000 Subject: Support rtems_ada_self iff __RTEMS_ADA__ is given. --- cpukit/score/src/threaddispatch.c | 2 ++ 1 file changed, 2 insertions(+) (limited to 'cpukit/score/src/threaddispatch.c') diff --git a/cpukit/score/src/threaddispatch.c b/cpukit/score/src/threaddispatch.c index 50bac5f4aa..b98ae2a6bc 100644 --- a/cpukit/score/src/threaddispatch.c +++ b/cpukit/score/src/threaddispatch.c @@ -93,8 +93,10 @@ void _Thread_Dispatch( void ) _Thread_Dispatch_disable_level = 1; _Context_Switch_necessary = FALSE; _Thread_Executing = heir; +#if __RTEMS_ADA__ executing->rtems_ada_self = rtems_ada_self; rtems_ada_self = heir->rtems_ada_self; +#endif if ( heir->budget_algorithm == THREAD_CPU_BUDGET_ALGORITHM_RESET_TIMESLICE ) heir->cpu_time_budget = _Thread_Ticks_per_timeslice; _ISR_Enable( level ); -- cgit v1.2.3