1 files changed, 0 insertions, 103 deletions
diff --git a/TAO/tao/corbacom.cpp b/TAO/tao/corbacom.cpp
deleted file mode 100644
index 13ad500ec29..00000000000
--- a/TAO/tao/corbacom.cpp
+++ /dev/null
@@ -1,103 +0,0 @@
-// $Id$
-
-// @(#)corbacom.cpp     1.1 95/08/31
-// Copyright 1994-1995 by Sun Microsystems Inc.
-// All Rights Reserved
-//
-// ORB:         support for primitive data types
-
-#include "tao/corba.h"
-
-// String utility support; this can need to be integrated with the
-// ORB's own memory allocation subsystem.
-
-CORBA::String
-CORBA::string_copy (const CORBA::Char *str)
-{
-  if (!str)
-    return 0;
-
-  CORBA::String retval = CORBA::string_alloc (ACE_OS::strlen (str));
-  // clear the contents of the allocated string
-  ACE_OS::memset(retval, '\0', ACE_OS::strlen (str));
-
-  return ACE_OS::strcpy (retval, str);
-}
-
-CORBA::String_var &
-CORBA::String_var::operator= (char *p)
-{
-  if (this->ptr_ != p)
-    {
-      if (this->ptr_ != 0)
-        CORBA::string_free (this->ptr_);
-      this->ptr_ = p;
-    }
-  return *this;
-}
-
-CORBA::String_var &
-CORBA::String_var::operator= (const char *p)
-{
-  if (this->ptr_ != 0)
-    CORBA::string_free (this->ptr_);
-
-  this->ptr_ = CORBA::string_dup (p);
-  return *this;
-}
-
-CORBA::String_var &
-CORBA::String_var::operator= (const CORBA::String_var& r)
-{
-  if (this != &r)
-    {
-      if (this->ptr_ != 0)
-        CORBA::string_free (this->ptr_);
-      this->ptr_ = CORBA::string_dup (r.ptr_);
-    }
-  return *this;
-}
-
-// Wide Character string utility support; this can need to be
-// integrated with the ORB's own memory allocation subsystem.
-
-CORBA::WString
-CORBA::wstring_alloc (CORBA::ULong len)
-{
-  return new CORBA::WChar [(size_t) (len + 1)];
-}
-
-static
-inline
-CORBA::WChar *
-wscpy (CORBA::WChar *dest,
-       const CORBA::WChar *src)
-{
-  CORBA::WChar  *retval = dest;
-
-  while ((*dest++ = *src++) != 0)
-    continue;
-  return retval;
-}
-
-CORBA::WString
-CORBA::wstring_copy (const CORBA::WChar *const str)
-{
-  if (*str)
-    return 0;
-
-  CORBA::WString retval = CORBA::wstring_alloc (ACE_WString::wstrlen (str));
-  return wscpy (retval, str);
-}
-
-void
-CORBA::wstring_free (CORBA::WChar *const str)
-{
-  delete [] str;
-}
-
-#if defined (ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION)
-template class TAO_Unbounded_Sequence<CORBA::Octet>;
-#elif defined (ACE_HAS_TEMPLATE_INSTANTIATION_PRAGMA)
-#pragma instantiate TAO_Unbounded_Sequence<CORBA::Octet>
-#endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */