diff options
Diffstat (limited to 'c/src/ada-tests/sptests/sp04/sptest.ads')
-rw-r--r-- | c/src/ada-tests/sptests/sp04/sptest.ads | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/c/src/ada-tests/sptests/sp04/sptest.ads b/c/src/ada-tests/sptests/sp04/sptest.ads index f165636192..6bbd930e85 100644 --- a/c/src/ada-tests/sptests/sp04/sptest.ads +++ b/c/src/ada-tests/sptests/sp04/sptest.ads @@ -58,6 +58,7 @@ package SPTEST is procedure INIT ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, INIT); -- -- TASK_1 @@ -70,6 +71,7 @@ package SPTEST is procedure TASK_1 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, TASK_1); -- -- TASK_2 @@ -83,6 +85,7 @@ package SPTEST is procedure TASK_2 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, TASK_2); -- -- TASK_3 @@ -96,6 +99,7 @@ package SPTEST is procedure TASK_3 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, TASK_3); -- -- TASK_SWITCH @@ -111,6 +115,7 @@ package SPTEST is UNUSED : in RTEMS.TCB_POINTER; HEIR : in RTEMS.TCB_POINTER ); + pragma Convention (C, TASK_SWITCH); -- -- This is the User Extension Table for this test. |