summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/support/init.c
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/ada-tests/support/init.c')
-rw-r--r--c/src/ada-tests/support/init.c82
1 files changed, 0 insertions, 82 deletions
diff --git a/c/src/ada-tests/support/init.c b/c/src/ada-tests/support/init.c
deleted file mode 100644
index 968b17b3a4..0000000000
--- a/c/src/ada-tests/support/init.c
+++ /dev/null
@@ -1,82 +0,0 @@
-/*
- * 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 );
-
-static void *POSIX_Init(
- void *argument
-)
-{
- (void) gnat_main ( 0, 0, 0 );
-
- exit( 0 );
-}
-
-/*
- * 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.
- */
-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 */
-}
-
-uint32_t milliseconds_per_tick(void)
-{
- return CONFIGURE_MICROSECONDS_PER_TICK / 1000;
-}
-
-uint32_t ticks_per_second(void)
-{
- return rtems_clock_get_ticks_per_second();
-}
-
-uint32_t work_space_size(void)
-{
- return CONFIGURE_EXECUTIVE_RAM_SIZE;
-}
-
-uint32_t is_configured_multiprocessing(void)
-{
-#if defined(RTEMS_MULTIPROCESSING)
- return 1;
-#else
- return 0;
-#endif
-}
-
-uint32_t get_node(void)
-{
- /* XXX HACK -- use public API */
- return _Objects_Local_node;
-}
-