2009-12-14 Joel Sherrill <joel.sherrill@oarcorp.com>

	* mptests/mp01/node1/mp01_node1.adb, mptests/mp01/node2/mp01_node2.adb,
	mptests/mp02/node1/mp02_node1.adb, mptests/mp02/node2/mp02_node2.adb,
	mptests/mp03/node1/mp03_node1.adb, mptests/mp03/node2/mp03_node2.adb,
	mptests/mp04/node1/mp04_node1.adb, mptests/mp04/node2/mp04_node2.adb,
	mptests/mp05/mptest.adb, mptests/mp05/node1/mp05_node1.adb,
	mptests/mp05/node2/mp05_node2.adb, mptests/mp06/node1/mp06_node1.adb,
	mptests/mp06/node2/mp06_node2.adb, mptests/mp07/node1/mp07_node1.adb,
	mptests/mp07/node2/mp07_node2.adb, mptests/mp08/node1/mp08_node1.adb,
	mptests/mp08/node2/mp08_node2.adb, mptests/mp09/node1/mp09_node1.adb,
	mptests/mp09/node2/mp09_node2.adb, mptests/mp10/node1/mp10_node1.adb,
	mptests/mp10/node2/mp10_node2.adb, mptests/mp11/node1/mp11_node1.adb,
	mptests/mp11/node2/mp11_node2.adb, mptests/mp12/node1/mp12_node1.adb,
	mptests/mp12/node2/mp12_node2.adb, mptests/mp13/node1/mp13_node1.adb,
	mptests/mp13/node2/mp13_node2.adb, mptests/mp14/mptest.adb,
	mptests/mp14/node1/mp14_node1.adb, mptests/mp14/node2/mp14_node2.adb,
	sptests/sp09/sptest.adb, sptests/sp11/sptest.adb,
	sptests/sp13/sptest.adb, sptests/sp16/sptest.adb,
	support/test_support.adb: Lines are now all less than 80 columns.

36 files changed, 90 insertions, 51 deletions

diff --git a/c/src/ada-tests/ChangeLog b/c/src/ada-tests/ChangeLog
index 22a463dd93..73f9d56386 100644
--- a/c/src/ada-tests/ChangeLog
+++ b/c/src/ada-tests/ChangeLog
@@ -1,5 +1,26 @@
 2009-12-14	Joel Sherrill <joel.sherrill@oarcorp.com>
 
+	* mptests/mp01/node1/mp01_node1.adb, mptests/mp01/node2/mp01_node2.adb,
+	mptests/mp02/node1/mp02_node1.adb, mptests/mp02/node2/mp02_node2.adb,
+	mptests/mp03/node1/mp03_node1.adb, mptests/mp03/node2/mp03_node2.adb,
+	mptests/mp04/node1/mp04_node1.adb, mptests/mp04/node2/mp04_node2.adb,
+	mptests/mp05/mptest.adb, mptests/mp05/node1/mp05_node1.adb,
+	mptests/mp05/node2/mp05_node2.adb, mptests/mp06/node1/mp06_node1.adb,
+	mptests/mp06/node2/mp06_node2.adb, mptests/mp07/node1/mp07_node1.adb,
+	mptests/mp07/node2/mp07_node2.adb, mptests/mp08/node1/mp08_node1.adb,
+	mptests/mp08/node2/mp08_node2.adb, mptests/mp09/node1/mp09_node1.adb,
+	mptests/mp09/node2/mp09_node2.adb, mptests/mp10/node1/mp10_node1.adb,
+	mptests/mp10/node2/mp10_node2.adb, mptests/mp11/node1/mp11_node1.adb,
+	mptests/mp11/node2/mp11_node2.adb, mptests/mp12/node1/mp12_node1.adb,
+	mptests/mp12/node2/mp12_node2.adb, mptests/mp13/node1/mp13_node1.adb,
+	mptests/mp13/node2/mp13_node2.adb, mptests/mp14/mptest.adb,
+	mptests/mp14/node1/mp14_node1.adb, mptests/mp14/node2/mp14_node2.adb,
+	sptests/sp09/sptest.adb, sptests/sp11/sptest.adb,
+	sptests/sp13/sptest.adb, sptests/sp16/sptest.adb,
+	support/test_support.adb: Lines are now all less than 80 columns.
+
+2009-12-14	Joel Sherrill <joel.sherrill@oarcorp.com>
+
 	* samples/base_sp/sptest.adb, samples/hello/sptest.adb,
 	samples/nsecs/sptest.adb, samples/ticker/sptest.adb,
 	sptests/sp01/sptest.adb, sptests/sp02/sptest.adb,
diff --git a/c/src/ada-tests/mptests/mp01/node1/mp01_node1.adb b/c/src/ada-tests/mptests/mp01/node1/mp01_node1.adb
index 3e804e2d97..36c97108a0 100644
--- a/c/src/ada-tests/mptests/mp01/node1/mp01_node1.adb
+++ b/c/src/ada-tests/mptests/mp01/node1/mp01_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP01_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP01_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp01/node2/mp01_node2.adb b/c/src/ada-tests/mptests/mp01/node2/mp01_node2.adb
index 00d7653d35..448e4247a4 100644
--- a/c/src/ada-tests/mptests/mp01/node2/mp01_node2.adb
+++ b/c/src/ada-tests/mptests/mp01/node2/mp01_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP01_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP01_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp02/node1/mp02_node1.adb b/c/src/ada-tests/mptests/mp02/node1/mp02_node1.adb
index dd2caf6497..20083de3c2 100644
--- a/c/src/ada-tests/mptests/mp02/node1/mp02_node1.adb
+++ b/c/src/ada-tests/mptests/mp02/node1/mp02_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP02_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP02_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp02/node2/mp02_node2.adb b/c/src/ada-tests/mptests/mp02/node2/mp02_node2.adb
index a7231479a6..f9c1602940 100644
--- a/c/src/ada-tests/mptests/mp02/node2/mp02_node2.adb
+++ b/c/src/ada-tests/mptests/mp02/node2/mp02_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP02_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP02_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp03/node1/mp03_node1.adb b/c/src/ada-tests/mptests/mp03/node1/mp03_node1.adb
index 9658d75fb0..a929a72667 100644
--- a/c/src/ada-tests/mptests/mp03/node1/mp03_node1.adb
+++ b/c/src/ada-tests/mptests/mp03/node1/mp03_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP03_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP03_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp03/node2/mp03_node2.adb b/c/src/ada-tests/mptests/mp03/node2/mp03_node2.adb
index 473540f0e5..64b6b26526 100644
--- a/c/src/ada-tests/mptests/mp03/node2/mp03_node2.adb
+++ b/c/src/ada-tests/mptests/mp03/node2/mp03_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP03_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP03_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp04/node1/mp04_node1.adb b/c/src/ada-tests/mptests/mp04/node1/mp04_node1.adb
index b6bafae38f..3932c64b43 100644
--- a/c/src/ada-tests/mptests/mp04/node1/mp04_node1.adb
+++ b/c/src/ada-tests/mptests/mp04/node1/mp04_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP04_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP04_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp04/node2/mp04_node2.adb b/c/src/ada-tests/mptests/mp04/node2/mp04_node2.adb
index fb6ce9343b..ccafc1dfa2 100644
--- a/c/src/ada-tests/mptests/mp04/node2/mp04_node2.adb
+++ b/c/src/ada-tests/mptests/mp04/node2/mp04_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP04_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP04_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp05/mptest.adb b/c/src/ada-tests/mptests/mp05/mptest.adb
index 748f75ebc3..b48b0d2785 100644
--- a/c/src/ada-tests/mptests/mp05/mptest.adb
+++ b/c/src/ada-tests/mptests/mp05/mptest.adb
@@ -204,7 +204,7 @@ package body MPTEST is
 
             exit when RTEMS.IS_STATUS_SUCCESSFUL( STATUS );
 
-            exit when not RTEMS.ARE_STATUSES_EQUAL( STATUS, RTEMS.NOT_DEFINED );
+            exit when not RTEMS.ARE_STATUSES_EQUAL(STATUS, RTEMS.NOT_DEFINED);
    
          end loop;
          TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "SIGNAL_SEND" );
diff --git a/c/src/ada-tests/mptests/mp05/node1/mp05_node1.adb b/c/src/ada-tests/mptests/mp05/node1/mp05_node1.adb
index 1a43e33df6..a4a826e035 100644
--- a/c/src/ada-tests/mptests/mp05/node1/mp05_node1.adb
+++ b/c/src/ada-tests/mptests/mp05/node1/mp05_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP05_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP05_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp05/node2/mp05_node2.adb b/c/src/ada-tests/mptests/mp05/node2/mp05_node2.adb
index 0a16c11c79..9ea86b9c55 100644
--- a/c/src/ada-tests/mptests/mp05/node2/mp05_node2.adb
+++ b/c/src/ada-tests/mptests/mp05/node2/mp05_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP05_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP05_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp06/node1/mp06_node1.adb b/c/src/ada-tests/mptests/mp06/node1/mp06_node1.adb
index 7100e6385e..396875e055 100644
--- a/c/src/ada-tests/mptests/mp06/node1/mp06_node1.adb
+++ b/c/src/ada-tests/mptests/mp06/node1/mp06_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP06_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP06_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp06/node2/mp06_node2.adb b/c/src/ada-tests/mptests/mp06/node2/mp06_node2.adb
index 1255348e4b..7a79bc1d36 100644
--- a/c/src/ada-tests/mptests/mp06/node2/mp06_node2.adb
+++ b/c/src/ada-tests/mptests/mp06/node2/mp06_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP06_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP06_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp07/node1/mp07_node1.adb b/c/src/ada-tests/mptests/mp07/node1/mp07_node1.adb
index ec9bb2f8b9..b6374c854f 100644
--- a/c/src/ada-tests/mptests/mp07/node1/mp07_node1.adb
+++ b/c/src/ada-tests/mptests/mp07/node1/mp07_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP07_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP07_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp07/node2/mp07_node2.adb b/c/src/ada-tests/mptests/mp07/node2/mp07_node2.adb
index a1075b3368..2af6a98954 100644
--- a/c/src/ada-tests/mptests/mp07/node2/mp07_node2.adb
+++ b/c/src/ada-tests/mptests/mp07/node2/mp07_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP07_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP07_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp08/node1/mp08_node1.adb b/c/src/ada-tests/mptests/mp08/node1/mp08_node1.adb
index bee8c1526a..ac7a636068 100644
--- a/c/src/ada-tests/mptests/mp08/node1/mp08_node1.adb
+++ b/c/src/ada-tests/mptests/mp08/node1/mp08_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP08_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP08_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp08/node2/mp08_node2.adb b/c/src/ada-tests/mptests/mp08/node2/mp08_node2.adb
index 8d88aabac8..dc838edf22 100644
--- a/c/src/ada-tests/mptests/mp08/node2/mp08_node2.adb
+++ b/c/src/ada-tests/mptests/mp08/node2/mp08_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP08_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP08_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp09/node1/mp09_node1.adb b/c/src/ada-tests/mptests/mp09/node1/mp09_node1.adb
index 1282eeb10a..63ba6ddb8b 100644
--- a/c/src/ada-tests/mptests/mp09/node1/mp09_node1.adb
+++ b/c/src/ada-tests/mptests/mp09/node1/mp09_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP09_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP09_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp09/node2/mp09_node2.adb b/c/src/ada-tests/mptests/mp09/node2/mp09_node2.adb
index a270b51a3e..18accbaa1b 100644
--- a/c/src/ada-tests/mptests/mp09/node2/mp09_node2.adb
+++ b/c/src/ada-tests/mptests/mp09/node2/mp09_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP09_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP09_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp10/node1/mp10_node1.adb b/c/src/ada-tests/mptests/mp10/node1/mp10_node1.adb
index 984070e32c..5fdb01be4a 100644
--- a/c/src/ada-tests/mptests/mp10/node1/mp10_node1.adb
+++ b/c/src/ada-tests/mptests/mp10/node1/mp10_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP10_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP10_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp10/node2/mp10_node2.adb b/c/src/ada-tests/mptests/mp10/node2/mp10_node2.adb
index ab95182331..eef4d3c98b 100644
--- a/c/src/ada-tests/mptests/mp10/node2/mp10_node2.adb
+++ b/c/src/ada-tests/mptests/mp10/node2/mp10_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP10_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP10_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp11/node1/mp11_node1.adb b/c/src/ada-tests/mptests/mp11/node1/mp11_node1.adb
index 0c66565710..d578d9dd6a 100644
--- a/c/src/ada-tests/mptests/mp11/node1/mp11_node1.adb
+++ b/c/src/ada-tests/mptests/mp11/node1/mp11_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP11_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP11_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp11/node2/mp11_node2.adb b/c/src/ada-tests/mptests/mp11/node2/mp11_node2.adb
index 3e44feaaa6..773a38dc2a 100644
--- a/c/src/ada-tests/mptests/mp11/node2/mp11_node2.adb
+++ b/c/src/ada-tests/mptests/mp11/node2/mp11_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP11_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP11_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp12/node1/mp12_node1.adb b/c/src/ada-tests/mptests/mp12/node1/mp12_node1.adb
index 75f8545734..87012a623d 100644
--- a/c/src/ada-tests/mptests/mp12/node1/mp12_node1.adb
+++ b/c/src/ada-tests/mptests/mp12/node1/mp12_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP12_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP12_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp12/node2/mp12_node2.adb b/c/src/ada-tests/mptests/mp12/node2/mp12_node2.adb
index bf690249a1..48a07fbd02 100644
--- a/c/src/ada-tests/mptests/mp12/node2/mp12_node2.adb
+++ b/c/src/ada-tests/mptests/mp12/node2/mp12_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP12_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP12_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp13/node1/mp13_node1.adb b/c/src/ada-tests/mptests/mp13/node1/mp13_node1.adb
index a548cc8945..388996f16d 100644
--- a/c/src/ada-tests/mptests/mp13/node1/mp13_node1.adb
+++ b/c/src/ada-tests/mptests/mp13/node1/mp13_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP13_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP13_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp13/node2/mp13_node2.adb b/c/src/ada-tests/mptests/mp13/node2/mp13_node2.adb
index e70cd83f6b..c47a10a4c8 100644
--- a/c/src/ada-tests/mptests/mp13/node2/mp13_node2.adb
+++ b/c/src/ada-tests/mptests/mp13/node2/mp13_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP13_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP13_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp14/mptest.adb b/c/src/ada-tests/mptests/mp14/mptest.adb
index 2984f49f68..846d85d452 100644
--- a/c/src/ada-tests/mptests/mp14/mptest.adb
+++ b/c/src/ada-tests/mptests/mp14/mptest.adb
@@ -58,7 +58,7 @@ package body MPTEST is
       pragma Import (C, BSP_MPCI_PRINT_STATISTICS, "MPCI_Print_statistics" );
    begin
  
-      RTEMS.TASK_MODE( RTEMS.NO_PREEMPT, RTEMS.PREEMPT_MASK, OLD_MODE, STATUS );
+      RTEMS.TASK_MODE(RTEMS.NO_PREEMPT, RTEMS.PREEMPT_MASK, OLD_MODE, STATUS);
       TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_MODE" );
 
       BSP_MPCI_PRINT_STATISTICS;
@@ -101,7 +101,8 @@ package body MPTEST is
 
       RTEMS.TIMER_FIRE_AFTER(
          MPTEST.STOP_TIMER_ID,
-         TEST_SUPPORT.MAXIMUM_LONG_TEST_DURATION * TEST_SUPPORT.TICKS_PER_SECOND,
+         TEST_SUPPORT.MAXIMUM_LONG_TEST_DURATION *
+            TEST_SUPPORT.TICKS_PER_SECOND,
          MPTEST.STOP_TEST_TSR'ACCESS,
          RTEMS.NULL_ADDRESS,
          STATUS
diff --git a/c/src/ada-tests/mptests/mp14/node1/mp14_node1.adb b/c/src/ada-tests/mptests/mp14/node1/mp14_node1.adb
index 891893da2e..68e0c4f3ce 100644
--- a/c/src/ada-tests/mptests/mp14/node1/mp14_node1.adb
+++ b/c/src/ada-tests/mptests/mp14/node1/mp14_node1.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP14_NODE1 of the Single Processor Test Suite.
+--  This is the entry point for Test MP14_NODE1 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/mptests/mp14/node2/mp14_node2.adb b/c/src/ada-tests/mptests/mp14/node2/mp14_node2.adb
index adc6a12cc3..4696cbb11e 100644
--- a/c/src/ada-tests/mptests/mp14/node2/mp14_node2.adb
+++ b/c/src/ada-tests/mptests/mp14/node2/mp14_node2.adb
@@ -3,7 +3,8 @@
 --
 --  DESCRIPTION:
 --
---  This is the entry point for Test MP14_NODE2 of the Single Processor Test Suite.
+--  This is the entry point for Test MP14_NODE2 of the Multiprocessor
+--  Test Suite.
 --
 --  DEPENDENCIES: 
 --
diff --git a/c/src/ada-tests/sptests/sp09/sptest.adb b/c/src/ada-tests/sptests/sp09/sptest.adb
index 5ce11c830c..0a2e24a37e 100644
--- a/c/src/ada-tests/sptests/sp09/sptest.adb
+++ b/c/src/ada-tests/sptests/sp09/sptest.adb
@@ -1323,7 +1323,7 @@ package body SPTEST is
         RTEMS.INVALID_ID,
         "MESSAGE_QUEUE_GET_NUMBER_PENDING WITH ILLEGAL ID"
       );
-      TEXT_IO.PUT_LINE( "TA1 - message_queue_get_number_pending - INVALID_ID" );
+      TEXT_IO.PUT_LINE("TA1 - message_queue_get_number_pending - INVALID_ID");
 
       RTEMS.MESSAGE_QUEUE_FLUSH( 100, COUNT, STATUS );
       TEST_SUPPORT.FATAL_DIRECTIVE_STATUS(
diff --git a/c/src/ada-tests/sptests/sp11/sptest.adb b/c/src/ada-tests/sptests/sp11/sptest.adb
index bfbff5d138..6868688a4e 100644
--- a/c/src/ada-tests/sptests/sp11/sptest.adb
+++ b/c/src/ada-tests/sptests/sp11/sptest.adb
@@ -672,7 +672,7 @@ package body SPTEST is
       TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "EVENT_SEND of 14 and 15" );
 
       TEXT_IO.PUT_LINE( 
-     "TA2 - event_receive - waiting forever on EVENT_17 or EVENT_18 - EVENT_ANY"
+   "TA2 - event_receive - waiting forever on EVENT_17 or EVENT_18 - EVENT_ANY"
       );
       RTEMS.EVENT_RECEIVE( 
          RTEMS.EVENT_17 + RTEMS.EVENT_18,
diff --git a/c/src/ada-tests/sptests/sp13/sptest.adb b/c/src/ada-tests/sptests/sp13/sptest.adb
index 4f807564ff..1feb222aef 100644
--- a/c/src/ada-tests/sptests/sp13/sptest.adb
+++ b/c/src/ada-tests/sptests/sp13/sptest.adb
@@ -616,7 +616,7 @@ TEST_SUPPORT.PAUSE;
               SPTEST.QUEUE_ID( 1 ),
               STATUS
           );
-          TEST_SUPPORT.DIRECTIVE_FAILED( status, "message_queue_create of Q1" );
+          TEST_SUPPORT.DIRECTIVE_FAILED(status, "message_queue_create of Q1");
 
           BIG_SEND_BUFFER := (others => CHARACTER'POS( 'A' ));
           BIG_RECEIVE_BUFFER := (others => CHARACTER'POS( 'Z' ));
@@ -666,7 +666,8 @@ TEST_SUPPORT.PAUSE;
           end if;
 
           if (BIG_SEND_BUFFER( BIG_SEND_BUFFER'FIRST .. Integer( SIZE )) /=
-            BIG_RECEIVE_BUFFER( BIG_RECEIVE_BUFFER'FIRST .. Integer( SIZE ))) then
+            BIG_RECEIVE_BUFFER( BIG_RECEIVE_BUFFER'FIRST .. Integer( SIZE )))
+          then
               TEXT_IO.PUT_LINE("TA1 - exact size data match failed");
           end if;
 
diff --git a/c/src/ada-tests/sptests/sp16/sptest.adb b/c/src/ada-tests/sptests/sp16/sptest.adb
index b3d245eb2d..822bc611cf 100644
--- a/c/src/ada-tests/sptests/sp16/sptest.adb
+++ b/c/src/ada-tests/sptests/sp16/sptest.adb
@@ -519,7 +519,8 @@ TEST_SUPPORT.PAUSE;
         "TA1 - return_segment - return segment to region 4 - "
       );
       PUT_ADDRESS_FROM_AREA_4( segment_address_1 );
-      RTEMS.REGION_RETURN_SEGMENT( SPTEST.REGION_ID( 4 ), segment_address_1, STATUS );
+      RTEMS.REGION_RETURN_SEGMENT(
+         SPTEST.REGION_ID( 4 ), segment_address_1, STATUS );
       TEST_SUPPORT.DIRECTIVE_FAILED( status, "region_return_segment" );
       TEXT_IO.NEW_LINE;
 
@@ -527,7 +528,8 @@ TEST_SUPPORT.PAUSE;
         "TA1 - region_return_segment - return segment to region 4 - "
       );
       PUT_ADDRESS_FROM_AREA_4( segment_address_3 );
-      RTEMS.REGION_RETURN_SEGMENT( SPTEST.REGION_ID( 4 ), segment_address_3, STATUS );
+      RTEMS.REGION_RETURN_SEGMENT(
+         SPTEST.REGION_ID( 4 ), segment_address_3, STATUS );
       TEST_SUPPORT.DIRECTIVE_FAILED( status, "region_return_segment" );
       TEXT_IO.NEW_LINE;
 
diff --git a/c/src/ada-tests/support/test_support.adb b/c/src/ada-tests/support/test_support.adb
index 78920767dd..e1f17f15a8 100644
--- a/c/src/ada-tests/support/test_support.adb
+++ b/c/src/ada-tests/support/test_support.adb
@@ -131,12 +131,6 @@ package body Test_Support is
       Text_IO.Put_Line( "<pause> " );
       -- Text_IO.Get_Line( Ignored_String, Ignored_Last );
 
-   -- exception
-
-   --    when Text_IO.End_Error =>
-   --    -- ignore this error.  It happens when redirecting input from /dev/null 
-   --    return;
-
    end Pause;
 
 --PAGE
@@ -159,12 +153,6 @@ package body Test_Support is
       Text_IO.Put_Line( "> " );
    --    Text_IO.Get_Line( Ignored_String, Ignored_Last );
  
-   -- exception
-
-   --    when Text_IO.End_Error =>
-   --    -- ignore this error.  It happens when redirecting input from /dev/null 
-   --    return;
-
    end Pause_And_Screen_Number;
 
 --PAGE
@@ -207,8 +195,6 @@ package body Test_Support is
 
       -- probably OK
       return RTEMS.Get_Index( TID ) - 1;
-      --   Ignoring this component.
-      --   - RTEMS.Configuration.RTEMS_API_Configuration.Number_Of_Initialization_Tasks;
 
    end Task_Number;