diff options
author | Joel Sherrill <joel.sherrill@oarcorp.com> | 2015-08-02 08:31:09 -0700 |
---|---|---|
committer | Joel Sherrill <joel.sherrill@oarcorp.com> | 2015-08-02 08:32:45 -0700 |
commit | 652888c22d3cdf8c326f44ea532584e55a1e3505 (patch) | |
tree | 81ead8130e80f98fae221372a4ba28494130726a /c/src/ada-tests | |
parent | Add __synch_synchronize function for arm (diff) | |
download | rtems-652888c22d3cdf8c326f44ea532584e55a1e3505.tar.bz2 |
ada-tests/support/init.c: Fix compile errors and warnings
closes #2379.
Diffstat (limited to 'c/src/ada-tests')
-rw-r--r-- | c/src/ada-tests/support/init.c | 31 |
1 files changed, 19 insertions, 12 deletions
diff --git a/c/src/ada-tests/support/init.c b/c/src/ada-tests/support/init.c index 3321f60d9c..0ee9e9f40a 100644 --- a/c/src/ada-tests/support/init.c +++ b/c/src/ada-tests/support/init.c @@ -1,17 +1,19 @@ /* - * COPYRIGHT (c) 1989-2007 + * COPYRIGHT (c) 1989-2015 * On-Line Applications Research Corporation (OAR). */ #include <bsp.h> #include <stdlib.h> +#include <rtems/score/threadimpl.h> + /* * This is the entry point automatically generated by GNAT. */ extern int gnat_main ( int argc, char **argv, char **envp ); -void *POSIX_Init( +static void *POSIX_Init( void *argument ) { @@ -21,28 +23,33 @@ void *POSIX_Init( } /* - * Only for sp04 and sp07 + * Prototypes for various test support routines. Since these are bound to + * from Ada, there are no external .h files even though they must be public. */ - -rtems_id tcb_to_id( - Thread_Control *tcb -) -{ - return tcb->Object.id; -} - +uint32_t milliseconds_per_tick(void); +uint32_t ticks_per_second(void); +uint32_t work_space_size(void); +uint32_t is_configured_multiprocessing(void); +uint32_t get_node(void); +rtems_id tcb_to_id(Thread_Control *tcb); /* * By putting this in brackets rather than quotes, we get the search * path and can get this file from ".." in the mptests. */ - #define CONFIGURE_INIT #define CONFIGURE_GNAT_RTEMS #define CONFIGURE_MEMORY_OVERHEAD (256) #include <config.h> +rtems_id tcb_to_id( + Thread_Control *tcb +) +{ + return tcb->Object.id; /* Only for sp04 and sp07 */ +} + uint32_t milliseconds_per_tick(void) { return CONFIGURE_MICROSECONDS_PER_TICK / 1000; |