1 files changed, 15 insertions, 2 deletions
diff --git a/c/src/ada-tests/support/test_support.ads b/c/src/ada-tests/support/test_support.ads
index eef9c22ede..8122c13f61 100644
--- a/c/src/ada-tests/support/test_support.ads
+++ b/c/src/ada-tests/support/test_support.ads
@@ -156,8 +156,8 @@ package Test_Support is
 --  occur each second.
 --
 
-   Ticks_Per_Second : RTEMS.Interval; 
-   pragma Import (C, Ticks_Per_Second, "_TOD_Ticks_per_second");
+   function Ticks_Per_Second 
+   return RTEMS.Interval; 
 
 --
 --  Milliseconds_Per_Tick is the number of milliseconds which
@@ -167,6 +167,19 @@ package Test_Support is
    function Milliseconds_Per_Tick 
    return RTEMS.Unsigned32;
 
+--
+--  Node is the node number in a multiprocessor configuration
+--
+
+   function Node 
+   return RTEMS.Unsigned32;
+
+--
+--  Longest time in seconds to run a test
+--
+
+    MAXIMUM_LONG_TEST_DURATION : RTEMS.UNSIGNED32;
+
 private
 
 end Test_Support;