From eefdc85973825b5bfa4ec12e1444f4c57d36a2f5 Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Sat, 14 Sep 2002 21:05:44 +0000 Subject: 2002-09-14 Joel Sherrill * support/init.c: Included for exit(2). * support/test_support.adb: Eliminated warnings by commenting out unused variables. --- c/src/ada-tests/ChangeLog | 6 ++++++ c/src/ada-tests/support/init.c | 1 + c/src/ada-tests/support/test_support.adb | 8 ++++---- 3 files changed, 11 insertions(+), 4 deletions(-) diff --git a/c/src/ada-tests/ChangeLog b/c/src/ada-tests/ChangeLog index 1963854913..38f9699159 100644 --- a/c/src/ada-tests/ChangeLog +++ b/c/src/ada-tests/ChangeLog @@ -1,3 +1,9 @@ +2002-09-14 Joel Sherrill + + * support/init.c: Included for exit(2). + * support/test_support.adb: Eliminated warnings by commenting out + unused variables. + 2002-09-13 Joel Sherrill * samples/base_mp/node1/Makefile.am, samples/base_mp/node2/Makefile.am: diff --git a/c/src/ada-tests/support/init.c b/c/src/ada-tests/support/init.c index 697c91dc0c..b85635faa0 100644 --- a/c/src/ada-tests/support/init.c +++ b/c/src/ada-tests/support/init.c @@ -12,6 +12,7 @@ #define __RTEMS_VIOLATE_KERNEL_VISIBILITY__ #include +#include void *POSIX_Init( void *argument diff --git a/c/src/ada-tests/support/test_support.adb b/c/src/ada-tests/support/test_support.adb index 379f0dfdae..3e676a2507 100644 --- a/c/src/ada-tests/support/test_support.adb +++ b/c/src/ada-tests/support/test_support.adb @@ -122,8 +122,8 @@ package body Test_Support is -- procedure Pause is - Ignored_String : String( 1 .. 80 ); - Ignored_Last : Natural; + -- Ignored_String : String( 1 .. 80 ); + -- Ignored_Last : Natural; begin @@ -149,8 +149,8 @@ package body Test_Support is procedure Pause_And_Screen_Number ( SCREEN : in RTEMS.Unsigned32 ) is - Ignored_String : String( 1 .. 80 ); - Ignored_Last : Natural; + -- Ignored_String : String( 1 .. 80 ); + -- Ignored_Last : Natural; begin -- -- cgit v1.2.3