diff options
| author | Joel Sherrill <joel.sherrill@OARcorp.com> | 2008-12-16 15:59:26 +0000 |
|---|---|---|
| committer | Joel Sherrill <joel.sherrill@OARcorp.com> | 2008-12-16 15:59:26 +0000 |
| commit | 237f4611d2593c184947fcaa787cfb4a5c737898 (patch) | |
| tree | 4984dccb9b53408c8ceefd7547a546adca7a2c20 /cpukit/libgnat/adasupp.c | |
| parent | 2008-12-16 Joel Sherrill <joel.sherrill@oarcorp.com> (diff) | |
| download | rtems-237f4611d2593c184947fcaa787cfb4a5c737898.tar.bz2 | |
2008-12-16 Joel Sherrill <joel.sherrill@oarcorp.com>
* libgnat/adasupp.c: Add helper method so Ada binding does not
reference _TOD_Microseconds_per_tick.
Diffstat (limited to '')
| -rw-r--r-- | cpukit/libgnat/adasupp.c | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/cpukit/libgnat/adasupp.c b/cpukit/libgnat/adasupp.c index c74fe3b34b..5af4730a65 100644 --- a/cpukit/libgnat/adasupp.c +++ b/cpukit/libgnat/adasupp.c @@ -10,10 +10,10 @@ #include <pthread.h> #include <rtems/system.h> +#include <rtems/config.h> #include <rtems/posix/pthread.h> -/*PAGE - * +/* * _ada_pthread_minimum_stack_size * * This routine returns the minimum stack size so the GNAT RTS can @@ -29,3 +29,8 @@ size_t _ada_pthread_minimum_stack_size( void ) return PTHREAD_MINIMUM_STACK_SIZE * 2; } + +uint32_t _ada_microseconds_per_tick(void) +{ + return rtems_configuration_get_microseconds_per_tick(); +} |