source: rtems/c/src/ada-tests/support/init.c @ ba3e1a4f

4.104.114.95
Last change on this file since ba3e1a4f was ba3e1a4f, checked in by Glenn Humphrey <glenn.humphrey@…>, on 10/10/07 at 20:58:48

2007-10-10 Glenn Humphrey <glenn.humphrey@…>

  • configure.ac, samples/base_sp/base_sp.scn, samples/base_sp/config.h, samples/base_sp/sptest.adb, samples/hello/config.h, samples/ticker/config.h, samples/ticker/ticker.scn, sptests/Makefile.am, sptests/sp01/sp01.scn, sptests/sp02/config.h, sptests/sp02/sp02.scn, sptests/sp03/config.h, sptests/sp03/sp03.scn, sptests/sp04/sp04.scn, sptests/sp04/sptest.adb, sptests/sp05/config.h, sptests/sp05/sp05.scn, sptests/sp06/config.h, sptests/sp07/config.h, sptests/sp07/sp07.scn, sptests/sp07/sptest.adb, sptests/sp07/sptest.ads, sptests/sp08/config.h, sptests/sp08/sp08.scn, sptests/sp09/Makefile.am, sptests/sp09/config.h, sptests/sp09/sp09.scn, sptests/sp09/sptest.adb, sptests/sp09/sptest.ads, sptests/sp11/config.h, sptests/sp11/sp11.scn, sptests/sp12/config.h, sptests/sp12/sp12.scn, sptests/sp13/config.h, sptests/sp13/sp13.scn, sptests/sp13/sptest.adb, sptests/sp14/config.h, sptests/sp14/sp14.scn, sptests/sp15/config.h, sptests/sp15/sp15.scn, sptests/sp16/config.h, sptests/sp16/sp16.scn, sptests/sp16/sptest.adb, sptests/sp17/config.h, sptests/sp19/config.h, sptests/sp19/sp19.scn, sptests/sp20/config.h, sptests/sp20/sp20.scn, sptests/sp22/config.h, sptests/sp22/sp22.scn, sptests/sp23/config.h, sptests/sp23/sp23.scn, sptests/sp24/config.h, sptests/sp24/sp24.scn, sptests/sp25/config.h, sptests/sp25/sp25.scn, support/init.c, support/test_support.adb, support/test_support.ads, tmtests/tm09/config.h, tmtests/tm20/tmtest.adb, tmtests/tmoverhd/dummy_rtems.adb, tmtests/tmoverhd/dummy_rtems.ads, tmtests/tmoverhd/tmtest.adb, tmtests/tmoverhd/tmtest.ads: Updated tests so that they would all compile and run without errors. Some tests that are no longer valid using the current binding were removed. Also updated the .scn files to reflect the current test output.
  • sptests/sp21/.cvsignore, sptests/sp21/Makefile.am, sptests/sp21/config.h, sptests/sp21/sp21.adb, sptests/sp21/sp21.scn, sptests/sp21/sptest.adb, sptests/sp21/sptest.ads, sptests/spsize/.cvsignore, sptests/spsize/Makefile.am, sptests/spsize/spsize.adb, sptests/spsize/sptest.adb, sptests/spsize/sptest.ads: Removed.
  • Property mode set to 100644
File size: 1.2 KB
Line 
1/*
2 *  COPYRIGHT (c) 1989-2007
3 *  On-Line Applications Research Corporation (OAR).
4 *
5 *  $Id$
6 */
7
8#define __RTEMS_VIOLATE_KERNEL_VISIBILITY__
9#include <bsp.h>
10#include <stdlib.h>
11
12void *POSIX_Init(
13  void *argument
14)
15{
16  extern int gnat_main ( int argc, char **argv, char **envp );
17
18  (void) gnat_main ( 0, 0, 0 );
19
20  exit( 0 );
21}
22
23/*
24 *  Only for sp04 and sp07
25 */
26
27rtems_id tcb_to_id(
28  Thread_Control *tcb
29)
30{
31  return tcb->Object.id;
32}
33
34
35/*
36 *  By putting this in brackets rather than quotes, we get the search
37 *  path and can get this file from ".." in the mptests.
38 */
39
40#define CONFIGURE_INIT
41#define CONFIGURE_GNAT_RTEMS
42#define CONFIGURE_MEMORY_OVERHEAD  (256)
43
44#include <config.h>
45
46uint32_t milliseconds_per_tick(void)
47{
48  return CONFIGURE_MICROSECONDS_PER_TICK / 1000;
49}
50
51uint32_t ticks_per_second(void)
52{
53  /* XXX HACK -- use public API */
54  return TOD_TICKS_PER_SECOND;
55}
56
57uint32_t work_space_size(void)
58{
59  return CONFIGURE_EXECUTIVE_RAM_SIZE;
60}
61
62uint32_t is_configured_multiprocessing(void)
63{
64#if defined(RTEMS_MULTIPROCESSING)
65  return 1;
66#else
67  return 0;
68#endif
69}
70
71uint32_t get_node(void)
72{
73  /* XXX HACK -- use public API */
74  return _Objects_Local_node;
75}
Note: See TracBrowser for help on using the repository browser.