diff options
Diffstat (limited to 'TAO/orbsvcs/tests/Bug_1393_Regression/run_test.pl')
-rwxr-xr-x | TAO/orbsvcs/tests/Bug_1393_Regression/run_test.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/TAO/orbsvcs/tests/Bug_1393_Regression/run_test.pl b/TAO/orbsvcs/tests/Bug_1393_Regression/run_test.pl index be6110bda53..3114c65aa87 100755 --- a/TAO/orbsvcs/tests/Bug_1393_Regression/run_test.pl +++ b/TAO/orbsvcs/tests/Bug_1393_Regression/run_test.pl @@ -40,7 +40,7 @@ _EOF_ close(HANDLE); $TAO_IDL = new PerlACE::Process("$tao_idl_bin/tao_idl"); -$TAO_IDL->Arguments("$test_idl"); +$TAO_IDL->Arguments("-Sc $test_idl"); $result = $TAO_IDL->SpawnWaitKill (30); # Search one of the stub files for the munged for of the interface name @@ -69,7 +69,7 @@ if ($result != 0) # Delete files created during IDL compilation unlink <test*.h>; unlink <test*.cpp>; -unlink <test*.i>; +unlink <test*.inl>; # The file name for the IFR service IOR $ifr_service_ior_file = PerlACE::LocalFile("ifr.ior"); |