summaryrefslogtreecommitdiff
path: root/TAO/TAO_IDL/be/be_visitor_valuetype/valuetype_obv_cs.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/TAO_IDL/be/be_visitor_valuetype/valuetype_obv_cs.cpp')
-rw-r--r--TAO/TAO_IDL/be/be_visitor_valuetype/valuetype_obv_cs.cpp111
1 files changed, 0 insertions, 111 deletions
diff --git a/TAO/TAO_IDL/be/be_visitor_valuetype/valuetype_obv_cs.cpp b/TAO/TAO_IDL/be/be_visitor_valuetype/valuetype_obv_cs.cpp
deleted file mode 100644
index 4bcf4ef00ba..00000000000
--- a/TAO/TAO_IDL/be/be_visitor_valuetype/valuetype_obv_cs.cpp
+++ /dev/null
@@ -1,111 +0,0 @@
-
-//
-// $Id$
-//
-
-// ============================================================================
-//
-// = LIBRARY
-// TAO IDL
-//
-// = FILENAME
-// valuetype_obv_cs.cpp
-//
-// = DESCRIPTION
-// Visitor generating code for Valuetypes
-// OBV_ class implementation
-// (see C++ mapping OMG 20.17)
-//
-// = AUTHOR
-// Torsten Kuepper <kuepper2@lfa.uni-wuppertal.de>,
-// derived from interface_ch.cpp from Aniruddha Gokhale
-//
-// ============================================================================
-
-#include "idl.h"
-#include "idl_extern.h"
-#include "be.h"
-
-#include "be_visitor_valuetype.h"
-
-ACE_RCSID(be_visitor_valuetype_obv_cs, valuetype_obv_cs, "$Id$")
-
-
-// ******************************************************
-// Valuetype visitor for OBV_ class implementation
-// ******************************************************
-
-be_visitor_valuetype_obv_cs::be_visitor_valuetype_obv_cs (be_visitor_context *ctx)
- : be_visitor_scope (ctx)
-{
-}
-
-be_visitor_valuetype_obv_cs::~be_visitor_valuetype_obv_cs (void)
-{
-}
-
-
-// OBV_ class must be in OBV_ namespace
-int
-be_visitor_valuetype_obv_cs::visit_valuetype (be_valuetype *node)
-{
- // only visit non-abstract valuetype
- if (node->is_abstract_valuetype ())
- return 0;
-
- TAO_OutStream *os = this->ctx_->stream ();
-
- // OBV_ class has no accessors or modifiers if we are optimizing
- // or the valuetype is abstract.
- if (!(node->opt_accessor () || node->is_abstract_valuetype () ))
- {
- os->indent ();
- *os << "CORBA::Boolean " << be_nl
- << node->full_obv_skel_name ()
- << "::_tao_marshal__" << node->flatname ()
- << " (TAO_OutputCDR &strm)"
- << "{" << be_idt_nl
- << "return " << node->full_obv_skel_name ()
- << "::_tao_marshal_state (strm);" << be_nl
- << be_uidt_nl << "}\n";
-
- *os << "CORBA::Boolean "
- << node->full_obv_skel_name ()
- << "::_tao_unmarshal__" << node->flatname ()
- << " (TAO_InputCDR &strm)"
- << "{" << be_idt_nl
- << "return " << node->full_obv_skel_name ()
- << "::_tao_unmarshal_state (strm);" << be_nl
- << be_uidt_nl << "}\n";
-
- if (this->visit_scope (node) == -1)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_valuetype_obv_cs::"
- "visit_valuetype - "
- "visit_scope failed\n"
- ), -1);
- }
- }
- return 0;
-}
-
-int
-be_visitor_valuetype_obv_cs::visit_field (be_field *node)
-{
- be_visitor_context *ctx = new be_visitor_context (*this->ctx_);
- be_visitor_valuetype_field_cs *visitor =
- new be_visitor_valuetype_field_cs (ctx);
- visitor->in_obv_space_ = 1;
- // visitor->setenclosings ("ACE_INLINE ");
- if (visitor->visit_field (node) == -1)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_valuetype_obv_cs::"
- "visit_field - "
- "visit_field failed\n"
- ), -1);
- }
- delete visitor;
- return 0;
-}