summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/mptests
diff options
context:
space:
mode:
authorJoel Sherrill <joel.sherrill@OARcorp.com>2008-03-11 20:12:52 +0000
committerJoel Sherrill <joel.sherrill@OARcorp.com>2008-03-11 20:12:52 +0000
commitd43dd822c6d971676c5455cd8e3b58556b759fb5 (patch)
tree94f5057d2c122d331a4de5ca1dcd8ecf7b5e6654 /c/src/ada-tests/mptests
parent2008-03-11 Joel Sherrill <joel.sherrill@oarcorp.com> (diff)
downloadrtems-d43dd822c6d971676c5455cd8e3b58556b759fb5.tar.bz2
2008-03-11 Joel Sherrill <joel.sherrill@oarcorp.com>
* mptests/mp01/mptest.ads, mptests/mp02/mptest.ads, mptests/mp03/mptest.ads, mptests/mp04/mptest.ads, mptests/mp05/mptest.ads, mptests/mp06/mptest.ads, mptests/mp07/mptest.ads, mptests/mp08/mptest.ads, mptests/mp09/mptest.ads, mptests/mp10/mptest.ads, mptests/mp11/mptest.ads, mptests/mp12/mptest.ads, mptests/mp13/mptest.ads, mptests/mp14/mptest.ads, samples/base_mp/mptest.ads, samples/base_sp/sptest.ads, samples/hello/sptest.ads, samples/nsecs/sptest.ads, samples/ticker/sptest.ads, sptests/sp01/sptest.ads, sptests/sp02/sptest.ads, sptests/sp03/sptest.ads, sptests/sp04/sptest.ads, sptests/sp05/sptest.ads, sptests/sp06/sptest.ads, sptests/sp07/sptest.ads, sptests/sp08/sptest.ads, sptests/sp09/sptest.ads, sptests/sp11/sptest.ads, sptests/sp12/sptest.ads, sptests/sp13/sptest.ads, sptests/sp14/sptest.ads, sptests/sp15/sptest.ads, sptests/sp16/sptest.ads, sptests/sp17/sptest.ads, sptests/sp19/sptest.ads, sptests/sp20/sptest.ads, sptests/sp22/sptest.ads, sptests/sp23/sptest.ads, sptests/sp24/sptest.ads, sptests/sp25/sptest.ads, sptests/spname01/spname01.adb, tmtests/tm01/tmtest.ads, tmtests/tm02/tmtest.ads, tmtests/tm03/tmtest.ads, tmtests/tm04/tmtest.ads, tmtests/tm05/tmtest.ads, tmtests/tm06/tmtest.ads, tmtests/tm07/tmtest.ads, tmtests/tm08/tmtest.ads, tmtests/tm09/tmtest.ads, tmtests/tm10/tmtest.ads, tmtests/tm11/tmtest.ads, tmtests/tm12/tmtest.ads, tmtests/tm13/tmtest.ads, tmtests/tm14/tmtest.ads, tmtests/tm15/tmtest.ads, tmtests/tm16/tmtest.ads, tmtests/tm17/tmtest.ads, tmtests/tm18/tmtest.ads, tmtests/tm19/tmtest.ads, tmtests/tm20/tmtest.adb, tmtests/tm20/tmtest.ads, tmtests/tm21/tmtest.ads, tmtests/tm22/tmtest.ads, tmtests/tm23/tmtest.ads, tmtests/tm24/tmtest.ads, tmtests/tm25/tmtest.ads, tmtests/tm28/tmtest.ads, tmtests/tm29/tmtest.ads, tmtests/tmck/tmtest.ads, tmtests/tmoverhd/tmtest.ads: Added pragma Convention C as required by gcc > 4.3.
Diffstat (limited to 'c/src/ada-tests/mptests')
-rw-r--r--c/src/ada-tests/mptests/mp01/mptest.ads2
-rw-r--r--c/src/ada-tests/mptests/mp02/mptest.ads2
-rw-r--r--c/src/ada-tests/mptests/mp03/mptest.ads3
-rw-r--r--c/src/ada-tests/mptests/mp04/mptest.ads2
-rw-r--r--c/src/ada-tests/mptests/mp05/mptest.ads4
-rw-r--r--c/src/ada-tests/mptests/mp06/mptest.ads3
-rw-r--r--c/src/ada-tests/mptests/mp07/mptest.ads3
-rw-r--r--c/src/ada-tests/mptests/mp08/mptest.ads2
-rw-r--r--c/src/ada-tests/mptests/mp09/mptest.ads2
-rw-r--r--c/src/ada-tests/mptests/mp10/mptest.ads4
-rw-r--r--c/src/ada-tests/mptests/mp11/mptest.ads1
-rw-r--r--c/src/ada-tests/mptests/mp12/mptest.ads1
-rw-r--r--c/src/ada-tests/mptests/mp13/mptest.ads3
-rw-r--r--c/src/ada-tests/mptests/mp14/mptest.ads6
14 files changed, 38 insertions, 0 deletions
diff --git a/c/src/ada-tests/mptests/mp01/mptest.ads b/c/src/ada-tests/mptests/mp01/mptest.ads
index d6b1619cb4..682d1a568c 100644
--- a/c/src/ada-tests/mptests/mp01/mptest.ads
+++ b/c/src/ada-tests/mptests/mp01/mptest.ads
@@ -43,6 +43,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK
@@ -55,5 +56,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp02/mptest.ads b/c/src/ada-tests/mptests/mp02/mptest.ads
index 493358293f..20f224cc1b 100644
--- a/c/src/ada-tests/mptests/mp02/mptest.ads
+++ b/c/src/ada-tests/mptests/mp02/mptest.ads
@@ -43,6 +43,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK
@@ -55,5 +56,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp03/mptest.ads b/c/src/ada-tests/mptests/mp03/mptest.ads
index c3a8b91993..6429355a1d 100644
--- a/c/src/ada-tests/mptests/mp03/mptest.ads
+++ b/c/src/ada-tests/mptests/mp03/mptest.ads
@@ -65,6 +65,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- DELAYED_SEND_EVENT
@@ -79,6 +80,7 @@ package MPTEST is
IGNORED_ID : in RTEMS.ID;
IGNORED_ADDRESS : in RTEMS.ADDRESS
);
+ pragma Convention (C, DELAYED_SEND_EVENT);
--
-- TEST_TASK
@@ -91,6 +93,7 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
--
-- TEST_TASK_SUPPORT
diff --git a/c/src/ada-tests/mptests/mp04/mptest.ads b/c/src/ada-tests/mptests/mp04/mptest.ads
index 5fde55d835..3c4d311923 100644
--- a/c/src/ada-tests/mptests/mp04/mptest.ads
+++ b/c/src/ada-tests/mptests/mp04/mptest.ads
@@ -57,6 +57,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK
@@ -69,5 +70,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp05/mptest.ads b/c/src/ada-tests/mptests/mp05/mptest.ads
index c3e5470ba3..08802f41e5 100644
--- a/c/src/ada-tests/mptests/mp05/mptest.ads
+++ b/c/src/ada-tests/mptests/mp05/mptest.ads
@@ -97,6 +97,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- PROCESS_ASR
@@ -109,6 +110,7 @@ package MPTEST is
procedure PROCESS_ASR (
SIGNAL : in RTEMS.SIGNAL_SET
);
+ pragma Convention (C, PROCESS_ASR);
--
-- STOP_TEST_TSR
@@ -122,6 +124,7 @@ package MPTEST is
IGNORED_ID : in RTEMS.ID;
IGNORED_ADDRESS : in RTEMS.ADDRESS
);
+ pragma Convention (C, STOP_TEST_TSR);
--
-- TEST_TASK
@@ -134,5 +137,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp06/mptest.ads b/c/src/ada-tests/mptests/mp06/mptest.ads
index bdaa10cab1..db6204a549 100644
--- a/c/src/ada-tests/mptests/mp06/mptest.ads
+++ b/c/src/ada-tests/mptests/mp06/mptest.ads
@@ -116,6 +116,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- STOP_TEST_TSR
@@ -129,6 +130,7 @@ package MPTEST is
IGNORED1 : in RTEMS.ID;
IGNORED2 : in RTEMS.ADDRESS
);
+ pragma Convention (C, STOP_TEST_TSR);
--
-- TEST_TASK
@@ -141,5 +143,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp07/mptest.ads b/c/src/ada-tests/mptests/mp07/mptest.ads
index 85f4c38f87..c33572f6e1 100644
--- a/c/src/ada-tests/mptests/mp07/mptest.ads
+++ b/c/src/ada-tests/mptests/mp07/mptest.ads
@@ -76,6 +76,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- STOP_TEST_TSR
@@ -89,6 +90,7 @@ package MPTEST is
IGNORED1 : in RTEMS.ID;
IGNORED2 : in RTEMS.ADDRESS
);
+ pragma Convention (C, STOP_TEST_TSR);
--
-- TEST_TASK
@@ -101,5 +103,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp08/mptest.ads b/c/src/ada-tests/mptests/mp08/mptest.ads
index 51124eca8a..1779701617 100644
--- a/c/src/ada-tests/mptests/mp08/mptest.ads
+++ b/c/src/ada-tests/mptests/mp08/mptest.ads
@@ -71,6 +71,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK
@@ -83,5 +84,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp09/mptest.ads b/c/src/ada-tests/mptests/mp09/mptest.ads
index 80cf89e051..1f68ab351d 100644
--- a/c/src/ada-tests/mptests/mp09/mptest.ads
+++ b/c/src/ada-tests/mptests/mp09/mptest.ads
@@ -88,6 +88,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- SEND_MESSAGES
@@ -145,5 +146,6 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp10/mptest.ads b/c/src/ada-tests/mptests/mp10/mptest.ads
index b69afdfc11..bcc7a6006b 100644
--- a/c/src/ada-tests/mptests/mp10/mptest.ads
+++ b/c/src/ada-tests/mptests/mp10/mptest.ads
@@ -79,6 +79,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK_1
@@ -91,6 +92,7 @@ package MPTEST is
procedure TEST_TASK_1 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK_1);
--
-- TEST_TASK_2
@@ -103,6 +105,7 @@ package MPTEST is
procedure TEST_TASK_2 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK_2);
--
-- TEST_TASK_3
@@ -115,5 +118,6 @@ package MPTEST is
procedure TEST_TASK_3 (
RESTART : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK_3);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp11/mptest.ads b/c/src/ada-tests/mptests/mp11/mptest.ads
index 3547f7b12c..fc37669b83 100644
--- a/c/src/ada-tests/mptests/mp11/mptest.ads
+++ b/c/src/ada-tests/mptests/mp11/mptest.ads
@@ -75,5 +75,6 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp12/mptest.ads b/c/src/ada-tests/mptests/mp12/mptest.ads
index 8ba7302438..322bac8d17 100644
--- a/c/src/ada-tests/mptests/mp12/mptest.ads
+++ b/c/src/ada-tests/mptests/mp12/mptest.ads
@@ -65,6 +65,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- This is the area used for the partition.
diff --git a/c/src/ada-tests/mptests/mp13/mptest.ads b/c/src/ada-tests/mptests/mp13/mptest.ads
index f8371d447f..5ab6882d46 100644
--- a/c/src/ada-tests/mptests/mp13/mptest.ads
+++ b/c/src/ada-tests/mptests/mp13/mptest.ads
@@ -73,6 +73,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK_1
@@ -85,6 +86,7 @@ package MPTEST is
procedure TEST_TASK_1 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK_1);
--
-- TEST_TASK_2
@@ -97,5 +99,6 @@ package MPTEST is
procedure TEST_TASK_2 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK_2);
end MPTEST;
diff --git a/c/src/ada-tests/mptests/mp14/mptest.ads b/c/src/ada-tests/mptests/mp14/mptest.ads
index 2ae8ec85a7..12e4a15451 100644
--- a/c/src/ada-tests/mptests/mp14/mptest.ads
+++ b/c/src/ada-tests/mptests/mp14/mptest.ads
@@ -177,6 +177,7 @@ package MPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_TASK
@@ -189,6 +190,7 @@ package MPTEST is
procedure TEST_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TEST_TASK);
--
-- DELAYED_EVENTS_TASK
@@ -201,6 +203,7 @@ package MPTEST is
procedure DELAYED_EVENTS_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, DELAYED_EVENTS_TASK);
--
-- MESSAGE_QUEUE_TASK
@@ -213,6 +216,7 @@ package MPTEST is
procedure MESSAGE_QUEUE_TASK (
INDEX : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, MESSAGE_QUEUE_TASK);
--
-- PARTITION_TASK
@@ -225,6 +229,7 @@ package MPTEST is
procedure PARTITION_TASK (
IGNORED : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, PARTITION_TASK);
--
-- SEMAPHORE_TASK
@@ -237,5 +242,6 @@ package MPTEST is
procedure SEMAPHORE_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, SEMAPHORE_TASK);
end MPTEST;