1 files changed, 0 insertions, 140 deletions
diff --git a/TAO/tests/Collocation/Coll_Tester.cpp b/TAO/tests/Collocation/Coll_Tester.cpp
deleted file mode 100644
index f7865934778..00000000000
--- a/TAO/tests/Collocation/Coll_Tester.cpp
+++ /dev/null
@@ -1,140 +0,0 @@
-// $Id$
-
-//============================================================================
-//
-//  =FILENAME
-//     Collocation_Test.h
-//
-//  =DESCRIPTION
-//     Server class to perform testing of TAO's collocation mechanism.
-//
-//  =AUTHOR
-//     Nanbor Wang
-//
-//=============================================================================
-
-#include "Coll_Tester.h"
-
-Collocation_Test::Collocation_Test (void)
-{
-  // no-op.
-}
-
-int
-Collocation_Test::init (int argc, char *argv[], CORBA::Environment &ACE_TRY_ENV)
-{
-  // Initialize the ORB.
-  this->orb_ = CORBA::ORB_init (argc, argv, 0, ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  int result = this->parse_args (argc, argv);
-  if (result != 0)
-    return result;
-
-  // Get an Object reference to RootPOA.
-  CORBA::Object_var obj =
-    this->orb_->resolve_initial_references ("RootPOA");
-
-  // Narrow the Object reference to a POA reference
-  this->root_poa_ =
-    PortableServer::POA::_narrow (obj.in (), ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  // Get the POAManager of RootPOA
-  this->poa_manager_ =
-    this->root_poa_->the_POAManager (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  // Activate the diamond servant and its base classes under RootPOA.
-  PortableServer::ObjectId_var id =
-    this->root_poa_->activate_object (&this->top_servant_,
-                                      ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  id =
-    this->root_poa_->activate_object (&this->left_servant_,
-                                      ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  id =
-    this->root_poa_->activate_object (&this->right_servant_,
-                                      ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  id =
-    this->root_poa_->activate_object (&this->diamond_servant_,
-                                      ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  // We only care about the most derived class here.
-  this->diamond_obj_ = this->diamond_servant_._this (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  CORBA::String_var str =
-    this->orb_->object_to_string (this->diamond_obj_.in (),
-                                  ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  ACE_DEBUG ((LM_DEBUG, "Diamond Servant activated:\n %s\n",
-              str.in()));
-
-  return 0;
-
-
-}
-
-int
-Collocation_Test::parse_args (int argc, char *argv[])
-{
-  return 0;
-}
-
-int
-Collocation_Test::test_narrow (CORBA::Environment &ACE_TRY_ENV)
-{
-  Diamond::Top_var top =
-    Diamond::Top::_narrow (this->diamond_obj_, ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  Diamond::Left_var left =
-    Diamond::Left::_narrow (this->diamond_obj_, ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  Diamond::Right_var right =
-    Diamond::Right::_narrow (this->diamond_obj_, ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  Diamond::Buttom_var buttom =
-    Diamond::Buttom::_narrow (this->diamond_obj_, ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  CORBA::String_var str = top->shape (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-  ACE_DEBUG ((LM_DEBUG, "Calling top->shape: %s\n", str.in ()));
-
-  str = left->shape (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-  ACE_DEBUG ((LM_DEBUG, "Calling left->shape: %s\n", str.in ()));
-
-  str = right->shape (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-  ACE_DEBUG ((LM_DEBUG, "Calling right->shape: %s\n", str.in ()));
-
-  str = buttom->shape (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-  ACE_DEBUG ((LM_DEBUG, "Calling buttom->shape: %s\n", str.in ()));
-
-  return 0;
-}
-
-int
-Collocation_Test::run (CORBA::Environment &ACE_TRY_ENV)
-{
-  this->poa_manager_->activate (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  this->test_narrow (ACE_TRY_ENV);
-  ACE_CHECK_RETURN (-1);
-
-  return 0;
-}