diff options
author | brunsch <brunsch@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2001-03-06 02:51:27 +0000 |
---|---|---|
committer | brunsch <brunsch@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2001-03-06 02:51:27 +0000 |
commit | 8028639d1b56cd9fd2ede64b1eabd5b27bc2a563 (patch) | |
tree | 3e9f930489725ad4f6027f1c5227a2972f6bc11e | |
parent | e45b7097ae366c466d4390d6d1b2ea3688bf1701 (diff) | |
download | ATCD-8028639d1b56cd9fd2ede64b1eabd5b27bc2a563.tar.gz |
ChangeLogTag:Mon Mar 5 18:46:42 2001 Fuzz Master D <brunsch@uci.edu>
-rw-r--r-- | TAO/ChangeLogs/ChangeLog-02a | 11 | ||||
-rwxr-xr-x | TAO/examples/Simple/time-date/run_test.pl | 2 | ||||
-rwxr-xr-x | TAO/orbsvcs/tests/Property/run_test.pl | 6 |
3 files changed, 15 insertions, 4 deletions
diff --git a/TAO/ChangeLogs/ChangeLog-02a b/TAO/ChangeLogs/ChangeLog-02a index 160ea4074af..6d76499dc60 100644 --- a/TAO/ChangeLogs/ChangeLog-02a +++ b/TAO/ChangeLogs/ChangeLog-02a @@ -1,3 +1,14 @@ +Mon Mar 5 18:46:42 2001 Fuzz Master D <brunsch@uci.edu> + + * examples/Simple/time-date/run_test.pl: + + Server hard codes ior file so my localfile thing will not + work. + + * orbsvcs/tests/Property/run_test.pl: + + Forgot some \n's in prints. + Mon Mar 5 18:40:58 2001 Carlos O'Ryan <coryan@uci.edu> * orbsvcs/tests/Event/lib/Driver.cpp: diff --git a/TAO/examples/Simple/time-date/run_test.pl b/TAO/examples/Simple/time-date/run_test.pl index 038a97933a2..93203c52e15 100755 --- a/TAO/examples/Simple/time-date/run_test.pl +++ b/TAO/examples/Simple/time-date/run_test.pl @@ -9,7 +9,7 @@ use lib "../../../../bin"; use PerlACE::Run_Test; $status = 0; -$iorfile = PerlACE::LocalFile ("timedate.ior"); +$iorfile = "ior"; $conf = PerlACE::LocalFile ("client.conf"); # Remove the file before starting the test. diff --git a/TAO/orbsvcs/tests/Property/run_test.pl b/TAO/orbsvcs/tests/Property/run_test.pl index d66bbd712a2..d9c9e7835d6 100755 --- a/TAO/orbsvcs/tests/Property/run_test.pl +++ b/TAO/orbsvcs/tests/Property/run_test.pl @@ -43,21 +43,21 @@ print STDERR "Starting Client\n"; $client = $CL->SpawnWaitKill (60); if ($client != 0) { - print STDERR "ERROR: client returned $client"; + print STDERR "ERROR: client returned $client\n"; $status = 1; } $server = $SV->TerminateWaitKill (5); if ($server != 0) { - print STDERR "ERROR: server returned $server"; + print STDERR "ERROR: server returned $server\n"; $status = 1; } $nserver = $NS->TerminateWaitKill (5); if ($nserver != 0) { - print STDERR "ERROR: name server returned $nserver"; + print STDERR "ERROR: name server returned $nserver\n"; $status = 1; } |