diff options
| author | msmit <msmit@remedy.nl> | 2009-11-10 20:00:56 +0000 |
|---|---|---|
| committer | msmit <msmit@remedy.nl> | 2009-11-10 20:00:56 +0000 |
| commit | 6acc96417cc790a6172974a17df0ad5284385af9 (patch) | |
| tree | d4e18aa38c3e6d530db625b912bd50403f38d796 /CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl | |
| parent | ba700bcfbd50d47191e9ddb78f3192e0d6ff9483 (diff) | |
| download | ATCD-6acc96417cc790a6172974a17df0ad5284385af9.tar.gz | |
Tue Nov 10 20:00:17 UTC 2009 Marcel Smit <msmit@remedy.nl>
* connectors/dds4ccm/examples/Hello/descriptors/ReceiverOnly.cdp:
* connectors/dds4ccm/examples/Hello/descriptors/SenderOnly.cdp:
Made deployable again.
* connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl:
* connectors/dds4ccm/examples/Hello/descriptors/run_receiver.pl:
* connectors/dds4ccm/examples/Hello/descriptors/run_sender.pl:
Improved cleanup of ior files.
Diffstat (limited to 'CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl')
| -rwxr-xr-x | CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl | 24 |
1 files changed, 21 insertions, 3 deletions
diff --git a/CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl b/CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl index 1f8db2303df..9bf25536809 100755 --- a/CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl +++ b/CIAO/connectors/dds4ccm/examples/Hello/descriptors/run_5_to_5.pl @@ -18,7 +18,7 @@ $ns_running = 0; $daemons = 2; @ports = ( 60001, 60002 ); -@iorfiles = ( "NodeApp1.ior", "NodeApp2.ior" ); +@iorfiles = ( "Sender.ior", "Receiver.ior" ); @nodenames = ( "SenderNode", "ReceiverNode" ); $status = 0; @@ -41,8 +41,26 @@ sub delete_ior_files { unlink $iorfiles[$i]; } unlink PerlACE::LocalFile ("EM.ior"); - unlink PerlACE::LocalFile ("Receiver.ior"); - unlink PerlACE::LocalFile ("Sender.ior"); + unlink PerlACE::LocalFile ("ReceiverOne.ior"); + unlink PerlACE::LocalFile ("ReceiverTwo.ior"); + unlink PerlACE::LocalFile ("ReceiverThree.ior"); + unlink PerlACE::LocalFile ("ReceiverFour.ior"); + unlink PerlACE::LocalFile ("ReceiverFive.ior"); + unlink PerlACE::LocalFile ("SenderOne.ior"); + unlink PerlACE::LocalFile ("SenderTwo.ior"); + unlink PerlACE::LocalFile ("SenderThree.ior"); + unlink PerlACE::LocalFile ("SenderFour.ior"); + unlink PerlACE::LocalFile ("SenderFive.ior"); + unlink PerlACE::LocalFile ("ReceiverConnectorOne.ior"); + unlink PerlACE::LocalFile ("ReceiverConnectorTwo.ior"); + unlink PerlACE::LocalFile ("ReceiverConnectorThree.ior"); + unlink PerlACE::LocalFile ("ReceiverConnectorFour.ior"); + unlink PerlACE::LocalFile ("ReceiverConnectorFive.ior"); + unlink PerlACE::LocalFile ("SenderConnectorOne.ior"); + unlink PerlACE::LocalFile ("SenderConnectorTwo.ior"); + unlink PerlACE::LocalFile ("SenderConnectorThree.ior"); + unlink PerlACE::LocalFile ("SenderConnectorFour.ior"); + unlink PerlACE::LocalFile ("SenderConnectorFive.ior"); unlink PerlACE::LocalFile ("DAM.ior"); unlink PerlACE::LocalFile ("ns.ior"); } |