corrected to compile with the new binding.

c/src/ada-tests/tmtests/tmoverhd/config.h

@@ -0,0 +1,37 @@
+/*  config.h
+ *
+ *  This include file defines the Configuration Table for this test.
+ *
+ *  COPYRIGHT (c) 1989-1997.
+ *  On-Line Applications Research Corporation (OAR).
+ *  Copyright assigned to U.S. Government, 1994.
+ *
+ *  The license and distribution terms for this file may in
+ *  the file LICENSE in this distribution or at
+ *  http://www.OARcorp.com/rtems/license.html.
+ *
+ *  $Id$
+ */
+
+
+/* configuration information */
+
+#define CONFIGURE_TMTEST
+
+#define CONFIGURE_TEST_NEEDS_CONSOLE_DRIVER
+#define CONFIGURE_TEST_NEEDS_TIMER_DRIVER
+
+#define CONFIGURE_MAXIMUM_TASKS              2
+#define CONFIGURE_MAXIMUM_SEMAPHORES         1
+#define CONFIGURE_TICKS_PER_TIMESLICE        0
+
+#define CONFIGURE_POSIX_INIT_THREAD_TABLE
+
+#define CONFIGURE_MAXIMUM_POSIX_THREADS              10
+#define CONFIGURE_MAXIMUM_POSIX_KEYS                 10
+#define CONFIGURE_MAXIMUM_POSIX_MUTEXES              20
+#define CONFIGURE_MAXIMUM_POSIX_CONDITION_VARIABLES  10
+
+#include <confdefs.h>
+
+/* end of include file */

c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb

@@ -30,12 +30,7 @@ package body DUMMY_RTEMS is
 
    procedure INITIALIZE_EXECUTIVE (
       CONFIGURATION_TABLE   : in     RTEMS.CONFIGURATION_TABLE_POINTER;
-      CPU_TABLE             : in     RTEMS.CPU_TABLE_POINTER;
+      CPU_TABLE             : in     RTEMS.CPU_TABLE_POINTER
-      TASK_TABLE            : in     RTEMS.INITIALIZATION_TASKS_TABLE_POINTER;
-      DRIVER_TABLE          : in     RTEMS.DRIVER_ADDRESS_TABLE_POINTER;
-      EXTENSION_TABLE       : in     RTEMS.EXTENSIONS_TABLE_POINTER;
-      MULTIPROCESSING_TABLE : in     RTEMS.MULTIPROCESSING_TABLE_POINTER;
-      MPCI_TABLE            : in     RTEMS.MPCI_TABLE_POINTER
    ) is
    begin
 

c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads

@@ -30,12 +30,7 @@ package DUMMY_RTEMS is
 
    procedure INITIALIZE_EXECUTIVE (
       CONFIGURATION_TABLE   : in     RTEMS.CONFIGURATION_TABLE_POINTER;
-      CPU_TABLE             : in     RTEMS.CPU_TABLE_POINTER;
+      CPU_TABLE             : in     RTEMS.CPU_TABLE_POINTER
-      TASK_TABLE            : in     RTEMS.INITIALIZATION_TASKS_TABLE_POINTER;
-      DRIVER_TABLE          : in     RTEMS.DRIVER_ADDRESS_TABLE_POINTER;
-      EXTENSION_TABLE       : in     RTEMS.EXTENSIONS_TABLE_POINTER;
-      MULTIPROCESSING_TABLE : in     RTEMS.MULTIPROCESSING_TABLE_POINTER;
-      MPCI_TABLE            : in     RTEMS.MPCI_TABLE_POINTER
    );
 
    procedure SHUTDOWN_EXECUTIVE (
@@ -63,7 +58,7 @@ package DUMMY_RTEMS is
 
    procedure TASK_START (
       ID          : in     RTEMS.ID;
-      ENTRY_POINT : in     RTEMS.TASK_ENTRY_POINT;
+      ENTRY_POINT : in     RTEMS.TASK_ENTRY;
       ARGUMENT    : in     RTEMS.UNSIGNED32;
       RESULT      :    out RTEMS.STATUS_CODES
    );
@@ -204,6 +199,7 @@ package DUMMY_RTEMS is
       NAME             : in     RTEMS.NAME;
       COUNT            : in     RTEMS.UNSIGNED32;
       ATTRIBUTE_SET    : in     RTEMS.ATTRIBUTE;
+      PRIORITY_CEILING : in     RTEMS.TASK_PRIORITY;
       ID               :    out RTEMS.ID;
       RESULT           :    out RTEMS.STATUS_CODES
    );
@@ -235,11 +231,12 @@ package DUMMY_RTEMS is
 -- Message Queue Manager
 
    procedure MESSAGE_QUEUE_CREATE (
-      NAME          : in     RTEMS.NAME;
+      Name             : in     RTEMS.Name;
-      COUNT         : in     RTEMS.UNSIGNED32;
+      Count            : in     RTEMS.Unsigned32;
-      ATTRIBUTE_SET : in     RTEMS.ATTRIBUTE;
+      Max_Message_Size : in     RTEMS.Unsigned32;
+      Attribute_Set    : in     RTEMS.Attribute;
       ID               :    out RTEMS.ID;
-      RESULT        :    out RTEMS.STATUS_CODES
+      Result           :    out RTEMS.Status_Codes
    );
 
    procedure MESSAGE_QUEUE_IDENT (
@@ -256,28 +253,32 @@ package DUMMY_RTEMS is
 
    procedure MESSAGE_QUEUE_SEND (
       ID     : in     RTEMS.ID;
-      BUFFER : in     RTEMS.BUFFER_POINTER;
+      BUFFER : in     RTEMS.ADDRESS;
+      SIZE   : in     RTEMS.UNSIGNED32;
       RESULT :    out RTEMS.STATUS_CODES
    );
 
    procedure MESSAGE_QUEUE_URGENT (
       ID     : in     RTEMS.ID;
-      BUFFER : in     RTEMS.BUFFER_POINTER;
+      BUFFER : in     RTEMS.ADDRESS;
+      SIZE   : in     RTEMS.UNSIGNED32;
       RESULT :    out RTEMS.STATUS_CODES
    );
 
    procedure MESSAGE_QUEUE_BROADCAST (
       ID     : in     RTEMS.ID;
-      BUFFER : in     RTEMS.BUFFER_POINTER;
+      BUFFER : in     RTEMS.ADDRESS;
+      SIZE   : in     RTEMS.UNSIGNED32;
       COUNT  :    out RTEMS.UNSIGNED32;
       RESULT :    out RTEMS.STATUS_CODES
    );
 
    procedure MESSAGE_QUEUE_RECEIVE (
       ID         : in     RTEMS.ID;
-      BUFFER     : in     RTEMS.BUFFER_POINTER;
+      BUFFER     : in     RTEMS.ADDRESS;
       OPTION_SET : in     RTEMS.OPTION;
       TIMEOUT    : in     RTEMS.INTERVAL;
+      SIZE       :    out RTEMS.UNSIGNED32;
       RESULT     :    out RTEMS.STATUS_CODES
    );
 

c/src/ada-tests/tmtests/tmoverhd/tmoverhd.adb

@@ -0,0 +1,57 @@
+--
+--  MAIN / BODY
+--
+--  DESCRIPTION:
+--
+--  This is the entry point for Test TMOVERHD of the Single Processor Test Suite.
+--
+--  DEPENDENCIES: 
+--
+--  
+--
+--  COPYRIGHT (c) 1989-1997.
+--  On-Line Applications Research Corporation (OAR).
+--  Copyright assigned to U.S. Government, 1994.
+--
+--  The license and distribution terms for this file may in
+--  the file LICENSE in this distribution or at
+--  http://www.OARcorp.com/rtems/license.html.
+--
+--  $Id$
+--
+
+with RTEMS;
+with TMTEST;
+with TEST_SUPPORT;
+
+procedure TMOVERHD is
+  INIT_ID : RTEMS.ID;
+  STATUS  : RTEMS.STATUS_CODES;
+begin
+
+   RTEMS.TASK_CREATE(
+      RTEMS.BUILD_NAME(  'I', 'N', 'I', 'T' ),
+      1,
+      RTEMS.MINIMUM_STACK_SIZE,
+      RTEMS.NO_PREEMPT,
+      RTEMS.DEFAULT_ATTRIBUTES,
+      INIT_ID,
+      STATUS
+   );
+   TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF INIT" );
+
+
+   RTEMS.TASK_START(
+      INIT_ID,
+      TMTEST.INIT'ACCESS,
+      0,
+      STATUS
+   );
+   TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF INIT" );
+
+   loop
+      delay 120.0;
+   end loop;
+
+end TMOVERHD;
+

c/src/ada-tests/tmtests/tmoverhd/tmtest.adb

@@ -21,7 +21,6 @@
 --  $Id$
 --
 
-with BSP;
 with DUMMY_RTEMS;
 with INTERFACES; use INTERFACES;
 with RTEMS;
@@ -163,13 +162,8 @@ package body TMTEST is
          for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT
          loop
             DUMMY_RTEMS.INITIALIZE_EXECUTIVE( 
-               BSP.CONFIGURATION'ACCESS,
+               RTEMS.CONFIGURATION,
-               CPU_TABLE'ACCESS,
+               CPU_TABLE'ACCESS
-               TMTEST.INITIALIZATION_TASKS'ACCESS,
-               RTEMS.NO_DEVICE_DRIVERS,
-               RTEMS.NO_USER_EXTENSIONS,
-               RTEMS.NO_MULTIPROCESSING_TABLE,
-               RTEMS.NO_MPCI_TABLE
             );
          end loop;
       TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER;