summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/tmtests/tmoverhd
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/ada-tests/tmtests/tmoverhd')
-rw-r--r--c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb8
-rw-r--r--c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads5
-rw-r--r--c/src/ada-tests/tmtests/tmoverhd/tmtest.adb4
3 files changed, 7 insertions, 10 deletions
diff --git a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb
index 5b4260a2bc..64fd09d0c7 100644
--- a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb
+++ b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb
@@ -189,18 +189,16 @@ package body DUMMY_RTEMS is
-- Clock Manager
- procedure CLOCK_GET (
- OPTION : in RTEMS.CLOCK.GET_OPTIONS;
- TIME_BUFFER : in RTEMS.ADDRESS;
+ procedure CLOCK_GET_TOD (
+ TIME_BUFFER : out RTEMS.ADDRESS;
RESULT : out RTEMS.STATUS_CODES
) is
- pragma Unreferenced(OPTION);
pragma Unreferenced(TIME_BUFFER);
begin
RESULT := RTEMS.SUCCESSFUL;
- end CLOCK_GET;
+ end CLOCK_GET_TOD;
procedure CLOCK_SET (
TIME_BUFFER : in RTEMS.TIME_OF_DAY;
diff --git a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads
index d560c4a5a1..da7f0773b9 100644
--- a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads
+++ b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads
@@ -108,9 +108,8 @@ package DUMMY_RTEMS is
-- Clock Manager
- procedure CLOCK_GET (
- OPTION : in RTEMS.CLOCK.GET_OPTIONS;
- TIME_BUFFER : in RTEMS.ADDRESS;
+ procedure CLOCK_GET_TOD (
+ TIME_BUFFER : out RTEMS.ADDRESS;
RESULT : out RTEMS.STATUS_CODES
);
diff --git a/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb b/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb
index a6050ea6c5..ce5b7a37b9 100644
--- a/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb
+++ b/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb
@@ -396,12 +396,12 @@ package body TMTEST is
-- 0
-- );
--- CLOCK_GET
+-- CLOCK_GET_TOD
TIMER_DRIVER.INITIALIZE;
for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT
loop
- DUMMY_RTEMS.CLOCK_GET( RTEMS.CLOCK.GET_TOD, TIME'ADDRESS, STATUS );
+ DUMMY_RTEMS.CLOCK_GET_TOD( TIME, STATUS );
end loop;
TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER;