diff options
Diffstat (limited to 'c/src/ada-tests/sptests/sp02/sptest.ads')
-rw-r--r-- | c/src/ada-tests/sptests/sp02/sptest.ads | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/c/src/ada-tests/sptests/sp02/sptest.ads b/c/src/ada-tests/sptests/sp02/sptest.ads index 9c8010ece6..1dd42d3eea 100644 --- a/c/src/ada-tests/sptests/sp02/sptest.ads +++ b/c/src/ada-tests/sptests/sp02/sptest.ads @@ -46,6 +46,7 @@ package SPTEST is procedure INIT ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, INIT); -- -- PREEMPT_TASK @@ -58,6 +59,7 @@ package SPTEST is procedure PREEMPT_TASK ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, PREEMPT_TASK); -- -- TASK_1 @@ -70,6 +72,7 @@ package SPTEST is procedure TASK_1 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, TASK_1); -- -- TASK_2 @@ -82,6 +85,7 @@ package SPTEST is procedure TASK_2 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, TASK_2); -- -- TASK_3 @@ -94,5 +98,6 @@ package SPTEST is procedure TASK_3 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ); + pragma Convention (C, TASK_3); end SPTEST; |