Merge pull request #2222 from jwillemsen/jwi-dllexportwarning
[ACE_TAO.git] / TAO / tests / Bug_4082_Regression / run_test.pl
blob6bc6f613b9ce0a5cc202039efc4226f10f07f8d2
1 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
2 & eval 'exec perl -S $0 $argv:q'
3 if 0;
5 # -*- perl -*-
7 use lib "$ENV{ACE_ROOT}/bin";
8 use PerlACE::TestTarget;
9 use strict;
11 my $target = PerlACE::TestTarget::create_target(1)
12 or die "Create target failed\n";
13 my $test = $target->CreateProcess("client");
14 my $result = $test->SpawnWaitKill($target->ProcessStartWaitInterval());
15 if ($result != 0) {
16 print STDERR "ERROR: test returned $result\n";
17 exit 1;
19 exit 0;