Changeset 23848bbd in rtems for c/src/ada-tests/mptests/mp10


Ignore:
Timestamp:
Oct 1, 2007, 10:58:09 PM (14 years ago)
Author:
Joel Sherrill <joel.sherrill@…>
Branches:
4.10, 4.11, 4.9, 5, master
Children:
d731ccc7
Parents:
f10fe707
Message:

2007-10-01 Joel Sherrill <joel.sherrill@…>

  • mptests/mp01/mptest.adb, mptests/mp01/mptest.ads, mptests/mp01/node1/Makefile.am, mptests/mp02/mptest.adb, mptests/mp02/mptest.ads, mptests/mp03/mptest.adb, mptests/mp03/mptest.ads, mptests/mp04/mptest.adb, mptests/mp04/mptest.ads, mptests/mp05/mptest.adb, mptests/mp05/mptest.ads, mptests/mp06/mptest.adb, mptests/mp06/mptest.ads, mptests/mp07/mptest.adb, mptests/mp07/mptest.ads, mptests/mp08/mptest.adb, mptests/mp08/mptest.ads, mptests/mp09/mptest.adb, mptests/mp09/mptest.ads, mptests/mp10/mptest.adb, mptests/mp10/mptest.ads, mptests/mp11/mptest.adb, mptests/mp11/mptest.ads, mptests/mp12/mptest.adb, mptests/mp12/mptest.ads, mptests/mp13/mptest.adb, mptests/mp13/mptest.ads, mptests/mp14/mptest.adb, mptests/mp14/mptest.ads, support/init.c, support/test_support.adb, support/test_support.ads: Most of single processor Ada tests now build. Some run.
Location:
c/src/ada-tests/mptests/mp10
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • c/src/ada-tests/mptests/mp10/mptest.adb

    rf10fe707 r23848bbd  
    2929package body MPTEST is
    3030
    31    package body PER_NODE_CONFIGURATION is separate;
    32 
    3331--PAGE
    3432--
    … …  
    4543      TEXT_IO.PUT( "*** TEST 10 -- NODE " );
    4644      UNSIGNED32_IO.PUT(
    47          MPTEST.MULTIPROCESSING_CONFIGURATION.NODE,
     45         TEST_SUPPORT.NODE,
    4846         WIDTH => 1
    4947      );
    … …  
    5957      MPTEST.SEMAPHORE_NAME( 1 ) := RTEMS.BUILD_NAME(  'S', 'E', 'M', ' ' );
    6058
    61       if MPTEST.MULTIPROCESSING_CONFIGURATION.NODE = 1 then
     59      if TEST_SUPPORT.NODE = 1 then
    6260
    6361         TEXT_IO.PUT_LINE( "Creating Message Queue (Global)" );

  • c/src/ada-tests/mptests/mp10/mptest.ads

    rf10fe707 r23848bbd  
    117117   );
    118118
    119 --
    120 --  This is the Driver Address Table for this test.
    121 --
    122 
    123    DEVICE_DRIVERS : aliased RTEMS.DRIVER_ADDRESS_TABLE( 1 .. 1 ) :=
    124    (1=>
    125       (
    126         CLOCK_DRIVER.INITIALIZE'ACCESS,              -- Initialization
    127         RTEMS.NO_DRIVER_ENTRY,                       -- Open
    128         RTEMS.NO_DRIVER_ENTRY,                       -- Close
    129         RTEMS.NO_DRIVER_ENTRY,                       -- Read
    130         RTEMS.NO_DRIVER_ENTRY,                       -- Write
    131         RTEMS.NO_DRIVER_ENTRY                        -- Control
    132       )
    133    );
    134 
    135 --
    136 --  This is the Initialization Tasks Table for this test.
    137 --
    138 
    139    INITIALIZATION_TASKS : aliased RTEMS.INITIALIZATION_TASKS_TABLE( 1 .. 1 ) :=
    140    (1=>
    141      (
    142        RTEMS.BUILD_NAME( 'U', 'I', '1', ' ' ),        -- task name
    143        2048,                                          -- stack size
    144        1,                                             -- priority
    145        RTEMS.DEFAULT_ATTRIBUTES,                      -- attributes
    146        MPTEST.INIT'ACCESS,                            -- entry point
    147        RTEMS.NO_PREEMPT,                              -- initial mode
    148        0                                              -- argument list
    149      )
    150    );
    151 
    152 ----------------------------------------------------------------------------
    153 ----------------------------------------------------------------------------
    154 --                             BEGIN SUBPACKAGE                           --
    155 ----------------------------------------------------------------------------
    156 ----------------------------------------------------------------------------
    157 
    158    --
    159    --  MPTEST.PER_NODE_CONFIGURATION / SPECIFICATION
    160    --
    161    --  DESCRIPTION:
    162    --
    163    --  This package is the specification for the subpackage
    164    --  which will define the per node configuration parameters.
    165    --
    166    
    167    package PER_NODE_CONFIGURATION is
    168 
    169    --
    170    --  LOCAL_NODE_NUMBER
    171    --
    172    --  DESCRIPTION:
    173    --
    174    --  This function returns the node number for this node.
    175    --
    176 
    177       function LOCAL_NODE_NUMBER
    178       return RTEMS.UNSIGNED32;
    179  
    180       pragma INLINE ( LOCAL_NODE_NUMBER );
    181 
    182    end PER_NODE_CONFIGURATION;
    183  
    184 ----------------------------------------------------------------------------
    185 ----------------------------------------------------------------------------
    186 --                              END SUBPACKAGE                            --
    187 ----------------------------------------------------------------------------
    188 ----------------------------------------------------------------------------
    189 
    190 --
    191 --  This is the Multiprocessor Configuration Table for this test.
    192 --
    193 
    194    MULTIPROCESSING_CONFIGURATION : aliased RTEMS.MULTIPROCESSING_TABLE := (
    195       MPTEST.PER_NODE_CONFIGURATION.LOCAL_NODE_NUMBER,
    196       2,                         -- maximum # nodes in system
    197       32,                        -- maximum # global objects
    198       32                         -- maximum # proxies
    199     );
    200 
    201 --
    202 --  This is the Configuration Table for this test.
    203 --
    204 
    205    CONFIGURATION : aliased RTEMS.CONFIGURATION_TABLE := (
    206       RTEMS.NULL_ADDRESS,        -- will be replaced by BSP
    207       64 * 1024,                 -- executive RAM size
    208       10,                        -- maximum # tasks
    209       0,                         -- maximum # timers
    210       1,                         -- maximum # semaphores
    211       1,                         -- maximum # message queues
    212       0,                         -- maximum # messages
    213       0,                         -- maximum # partitions
    214       0,                         -- maximum # regions
    215       0,                         -- maximum # dp memory areas
    216       0,                         -- maximum # periods
    217       0,                         -- maximum # user extensions
    218       RTEMS.MILLISECONDS_TO_MICROSECONDS(10), -- # us in a tick
    219       50                         -- # ticks in a timeslice
    220   );
    221 
    222119end MPTEST;
Note: See TracChangeset for help on using the changeset viewer.