From 3a23218a74723a77a5438c6960879e4ab4e1d2be Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Mon, 14 Dec 2009 21:28:54 +0000 Subject: 2009-12-14 Joel Sherrill * 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. --- c/src/ada-tests/sptests/sp09/sptest.adb | 2 +- c/src/ada-tests/sptests/sp11/sptest.adb | 2 +- c/src/ada-tests/sptests/sp13/sptest.adb | 5 +++-- c/src/ada-tests/sptests/sp16/sptest.adb | 6 ++++-- 4 files changed, 9 insertions(+), 6 deletions(-) (limited to 'c/src/ada-tests/sptests') 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; -- cgit v1.2.3