Changeset ba3e1a4f in rtems for c/src/ada-tests/support


Ignore:
Timestamp:
Oct 10, 2007, 8:58:48 PM (13 years ago)
Author:
Glenn Humphrey <glenn.humphrey@…>
Branches:
4.10, 4.11, 4.9, 5, master
Children:
67e024b
Parents:
d14963b
Message:

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.
Location:
c/src/ada-tests/support
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • c/src/ada-tests/support/init.c

    rd14963b rba3e1a4f  
    2222
    2323/*
    24  *  Only for sp04
     24 *  Only for sp04 and sp07
    2525 */
    2626
     
    5555}
    5656
     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
    5771uint32_t get_node(void)
    5872{
  • c/src/ada-tests/support/test_support.adb

    rd14963b rba3e1a4f  
    1111-- 
    1212--
    13 --  COPYRIGHT (c) 1989-1997.
     13--  COPYRIGHT (c) 1989-2007.
    1414--  On-Line Applications Research Corporation (OAR).
    1515--
     
    251251
    252252--
     253--  Return the size of the RTEMS Workspace
     254--
     255
     256   function Work_Space_Size
     257   return RTEMS.Unsigned32 is
     258      function Work_Space_Size_Base return RTEMS.Unsigned32;
     259      pragma Import (C, Work_Space_Size_Base, "work_space_size");
     260   begin
     261      return Work_Space_Size_Base;
     262   end Work_Space_Size;
     263
     264--
     265--  Return an indication of whether multiprocessing is configured
     266--
     267
     268   function Is_Configured_Multiprocessing
     269   return Boolean is
     270      function Is_Configured_Multiprocessing_Base return RTEMS.Unsigned32;
     271      pragma Import (
     272         C, Is_Configured_Multiprocessing_Base, "is_configured_multiprocessing"
     273      );
     274   begin
     275      if Is_Configured_Multiprocessing_Base = 1 then
     276         return True;
     277      else
     278         return False;
     279      end if;
     280   end Is_Configured_Multiprocessing;
     281
     282--
    253283--  Node is the node number in a multiprocessor configuration
    254284--
  • c/src/ada-tests/support/test_support.ads

    rd14963b rba3e1a4f  
    1111-- 
    1212--
    13 --  COPYRIGHT (c) 1989-1997.
     13--  COPYRIGHT (c) 1989-2007.
    1414--  On-Line Applications Research Corporation (OAR).
    1515--
     
    169169
    170170--
     171--  Return the size of the RTEMS Workspace
     172--
     173
     174   function Work_Space_Size
     175   return RTEMS.Unsigned32;
     176
     177--
     178--  Return an indication of whether multiprocessing is configured
     179--
     180
     181   function Is_Configured_Multiprocessing
     182   return Boolean;
     183
     184--
    171185--  Node is the node number in a multiprocessor configuration
    172186--
Note: See TracChangeset for help on using the changeset viewer.