diff options
Diffstat (limited to 'TAO/TAO_IDL/be/be_visitor_array/array_ci.cpp')
| -rw-r--r-- | TAO/TAO_IDL/be/be_visitor_array/array_ci.cpp | 702 |
1 files changed, 0 insertions, 702 deletions
diff --git a/TAO/TAO_IDL/be/be_visitor_array/array_ci.cpp b/TAO/TAO_IDL/be/be_visitor_array/array_ci.cpp deleted file mode 100644 index e664de6ac60..00000000000 --- a/TAO/TAO_IDL/be/be_visitor_array/array_ci.cpp +++ /dev/null @@ -1,702 +0,0 @@ -// -// $Id$ -// - -// ============================================================================ -// -// = LIBRARY -// TAO IDL -// -// = FILENAME -// array_ci.cpp -// -// = DESCRIPTION -// Visitor generating code for Arrays in the client inline. -// -// = AUTHOR -// Aniruddha Gokhale -// -// ============================================================================ - -#include "idl.h" -#include "idl_extern.h" -#include "be.h" - -#include "be_visitor_array.h" - -ACE_RCSID(be_visitor_array, array_ci, "$Id$") - - -// ************************************************************************ -// visitor for array declaration in client inline -// ************************************************************************ - -be_visitor_array_ci::be_visitor_array_ci (be_visitor_context *ctx) - : be_visitor_array (ctx) -{ -} - -be_visitor_array_ci::~be_visitor_array_ci (void) -{ -} - -int be_visitor_array_ci::visit_array (be_array *node) -{ - TAO_OutStream *os = this->ctx_->stream (); // get output stream - be_type *bt; // base type - be_decl *scope = this->ctx_->scope (); // scope in which it is used - - // nothing to do if we are imported or code is already generated - if (node->imported () || (node->cli_inline_gen ())) - return 0; - - this->ctx_->node (node); // save the array node - - // retrieve the type - bt = be_type::narrow_from_decl (node->base_type ()); - if (!bt) - { - ACE_ERROR_RETURN ((LM_ERROR, - "be_visitor_array_ci::" - "visit_array - " - "Bad base type\n"), - -1); - } - - char fname [NAMEBUFSIZE]; // to hold the full and - char lname [NAMEBUFSIZE]; // local names - // save the node's local name and full name in a buffer for quick use later - // on - ACE_OS::memset (fname, '\0', NAMEBUFSIZE); - ACE_OS::memset (lname, '\0', NAMEBUFSIZE); - if (this->ctx_->tdef ()) - { - // typedefed node - ACE_OS::sprintf (fname, "%s", node->fullname ()); - ACE_OS::sprintf (lname, "%s", - node->local_name ()->get_string ()); - } - else - { - // for anonymous arrays ... - // we have to generate a name for us that has an underscope prepended to - // our local name. This needs to be inserted after the parents's name - - if (node->is_nested ()) - { - be_decl *parent = be_scope::narrow_from_scope (node->defined_in ())->decl (); - ACE_OS::sprintf (fname, "%s::_%s", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (lname, "_%s", - node->local_name ()->get_string ()); - } - else - { - ACE_OS::sprintf (fname, "_%s", node->fullname ()); - ACE_OS::sprintf (lname, "_%s", - node->local_name ()->get_string ()); - } - } - - // alloc method - os->indent (); // start from current indentation - *os << "ACE_INLINE " << fname << "_slice *" << be_nl; - *os << fname << "_alloc (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return new "; - if (bt->accept (this) == -1) - { - ACE_ERROR_RETURN ((LM_ERROR, - "be_visitor_array_ci::" - "visit_array - " - "base type decl failed\n"), - -1); - } - - if (node->gen_dimensions (os) == -1) - { - ACE_ERROR_RETURN ((LM_ERROR, - "(%N:%l) be_array::" - "gen_client_inline - " - "dimensions codegen failed\n"), - -1); - } - - *os << ";" << be_uidt_nl; - *os << "}\n\n"; - - // free method - os->indent (); - *os << "ACE_INLINE void" << be_nl - << fname << "_free (" << fname - << "_slice *_tao_slice)" << be_nl; - *os << "{" << be_idt_nl; - *os << "delete [] _tao_slice;" << be_uidt_nl; - *os << "}\n\n"; - - // generate code for the _var, _out, and _forany types - if (this->gen_var_impl (node) == -1) - { - ACE_ERROR_RETURN ((LM_ERROR, - "be_visitor_array_ci::" - "visit_array - " - "var_defn failed\n"), - -1); - } - if (node->size_type () == be_decl::VARIABLE) - { - if (this->gen_out_impl (node) == -1) - { - ACE_ERROR_RETURN ((LM_ERROR, - "be_visitor_array_ci::" - "visit_array - " - "out_defn failed\n"), - -1); - } - } - - if (this->gen_forany_impl (node) == -1) - { - ACE_ERROR_RETURN ((LM_ERROR, - "be_visitor_array_ci::" - "visit_array - " - "forany_defn failed\n"), - -1); - } - - node->cli_inline_gen (1); - return 0; -} - -// implementation of the _var class. All of these get generated in the inline -// file -int -be_visitor_array_ci::gen_var_impl (be_array *node) -{ - TAO_OutStream *os = this->ctx_->stream (); // output stream - - char nodename [NAMEBUFSIZE]; // node name - char fname [NAMEBUFSIZE]; // to hold the full and - char lname [NAMEBUFSIZE]; // local names of the var - // save the node's local name and full name in a buffer for quick use later - // on - ACE_OS::memset (nodename, '\0', NAMEBUFSIZE); - ACE_OS::memset (fname, '\0', NAMEBUFSIZE); - ACE_OS::memset (lname, '\0', NAMEBUFSIZE); - if (this->ctx_->tdef ()) - { - // typedefed node - ACE_OS::sprintf (nodename, "%s", node->fullname ()); - ACE_OS::sprintf (fname, "%s_var", node->fullname ()); - ACE_OS::sprintf (lname, "%s_var", - node->local_name ()->get_string ()); - } - else - { - // for anonymous arrays ... - // we have to generate a name for us that has an underscope prepended to - // our local name. This needs to be inserted after the parents's name - if (node->is_nested ()) - { - be_decl *parent = be_scope::narrow_from_scope (node->defined_in ())->decl (); - ACE_OS::sprintf (nodename, "%s::_%s", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (fname, "%s::_%s_var", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (lname, "_%s_var", - node->local_name ()->get_string ()); - } - else - { - ACE_OS::sprintf (nodename, "_%s", node->fullname ()); - ACE_OS::sprintf (fname, "_%s_var", node->fullname ()); - ACE_OS::sprintf (lname, "_%s_var", - node->local_name ()->get_string ()); - } - } - - // generate the var implementation in the inline file - - os->indent (); // start with whatever was our current indent level - - *os << "// *************************************************************" - << be_nl; - *os << "// Inline operations for class " << fname << be_nl; - *os << "// *************************************************************\n\n"; - - // default constr - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << - " (void) // default constructor" << be_nl; - *os << " " << ": ptr_ ((" << nodename << "_slice *)0)" << be_nl; - *os << "{}\n\n"; - - // constr from a _slice * - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (" << nodename << "_slice *p)" << be_nl; - *os << " : ptr_ (p)" << be_nl; - *os << "{}\n\n"; - - // copy constructor (deep copy) - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (const " << fname - << " &p) // copy constructor" << be_nl; - *os << "{" << be_idt_nl; - *os << "this->ptr_ = " << nodename << "_dup (p.ptr_);" << be_uidt_nl; - *os << "}\n\n"; - - // destructor - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::~" << lname << " (void) // destructor" << be_nl; - *os << "{" << be_idt_nl; - *os << nodename << "_free (this->ptr_);" << be_uidt_nl; - *os << "}\n\n"; - - // assignment operator - os->indent (); - *os << "ACE_INLINE " << fname << " &" << be_nl; - *os << fname << "::operator= (" << nodename - << "_slice *p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "// is what we own the same that is being assigned to us?" - << be_nl; - *os << "if (this->ptr_ != p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "// delete our stuff and assume ownership of p" << be_nl; - *os << nodename << "_free (this->ptr_);" << be_nl; - *os << "this->ptr_ = p;" << be_uidt_nl; - *os << "}" << be_nl; - *os << "return *this;" << be_uidt_nl; - *os << "}\n\n"; - - // assignment operator from _var - os->indent (); - *os << "ACE_INLINE " << fname << " &" << be_nl; - *os << fname << "::operator= (const " << fname - << " &p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "if (this != &p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "// not assigning to ourselves" << be_nl; - *os << nodename << "_free (this->ptr_); // free old stuff" << be_nl; - *os << "this->ptr_ = " << nodename - << "_dup (p.ptr_);// deep copy" << be_uidt_nl; - *os << "}" << be_nl; - *os << "return *this;" << be_uidt_nl; - *os << "}\n\n"; - - // other extra methods - cast operators () - os->indent (); - *os << "ACE_INLINE " << be_nl; - *os << fname << "::operator " << nodename - << "_slice * const &() const // cast" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << be_nl; - *os << fname << "::operator " << nodename << "_slice *&() // cast " << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - // two operator []s instead of -> - os->indent (); - *os << "ACE_INLINE const " << nodename << "_slice &" << be_nl; - *os << fname << "::operator[] (CORBA::ULong index) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_[index];" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice &" << be_nl; - *os << fname << "::operator[] (CORBA::ULong index)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_[index];" << be_uidt_nl; - *os << "}\n\n"; - - // in, inout, out, and _retn - os->indent (); - *os << "ACE_INLINE const " << nodename << "_slice *" << be_nl; - *os << fname << "::in (void) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *" << be_nl; - *os << fname << "::inout (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice * &" << be_nl; - *os << fname << "::out (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << nodename << "_free (this->ptr_);" << be_nl; - *os << "this->ptr_ = (" << nodename << "_slice *)0;" << be_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *" << be_nl; - *os << fname << "::_retn (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << nodename << "_slice *tmp = this->ptr_;" << be_nl; - *os << "this->ptr_ = (" << nodename << "_slice *)0;" << be_nl; - *os << "return tmp;" << be_uidt_nl; - *os << "}\n\n"; - - // the additional ptr () member function - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *" << be_nl; - *os << fname << "::ptr (void) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - return 0; -} - -int -be_visitor_array_ci::gen_out_impl (be_array *node) -{ - TAO_OutStream *os = this->ctx_->stream (); // output stream - - char nodename [NAMEBUFSIZE]; // node name - char fname [NAMEBUFSIZE]; // to hold the full and - char lname [NAMEBUFSIZE]; // local names of the out class - // save the node's local name and full name in a buffer for quick use later - // on - ACE_OS::memset (nodename, '\0', NAMEBUFSIZE); - ACE_OS::memset (fname, '\0', NAMEBUFSIZE); - ACE_OS::memset (lname, '\0', NAMEBUFSIZE); - if (this->ctx_->tdef ()) - { - // typedefed node - ACE_OS::sprintf (nodename, "%s", node->fullname ()); - ACE_OS::sprintf (fname, "%s_out", node->fullname ()); - ACE_OS::sprintf (lname, "%s_out", - node->local_name ()->get_string ()); - } - else - { - // for anonymous arrays ... - // we have to generate a name for us that has an underscope prepended to - // our local name. This needs to be inserted after the parents's name - if (node->is_nested ()) - { - be_decl *parent = be_scope::narrow_from_scope (node->defined_in ())->decl (); - ACE_OS::sprintf (nodename, "%s::_%s", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (fname, "%s::_%s_out", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (lname, "_%s_out", - node->local_name ()->get_string ()); - } - else - { - ACE_OS::sprintf (nodename, "_%s", node->fullname ()); - ACE_OS::sprintf (fname, "_%s_out", node->fullname ()); - ACE_OS::sprintf (lname, "_%s_out", - node->local_name ()->get_string ()); - } - } - - // generate the out implementation in the inline file - - os->indent (); // start with whatever was our current indent level - - *os << "// *************************************************************" - << be_nl; - *os << "// Inline operations for class " << fname << be_nl; - *os << "// *************************************************************\n\n"; - - // constr from a pointer to slice - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (" << nodename << "_slice *&p)" << be_nl; - *os << " : ptr_ (p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "this->ptr_ = 0;" << be_uidt_nl; - *os << "}\n\n"; - - // constructor from _var & - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (" << nodename - << "_var &p) // constructor from _var" << be_nl; - *os << " : ptr_ (p.out ())" << be_nl; - *os << "{" << be_idt_nl; - *os << nodename << "_free (this->ptr_);" << be_nl; - *os << "this->ptr_ = 0;" << be_uidt_nl; - *os << "}\n\n"; - - // copy constructor - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (const " << fname - << " &p) // copy constructor" << be_nl; - *os << " : ptr_ (ACE_const_cast (" - << fname << "&,p).ptr_)" << be_nl; - *os << "{}\n\n"; - - // assignment operator from _out & - os->indent (); - *os << "ACE_INLINE " << fname << " &" << be_nl; - *os << fname << "::operator= (const " << fname - << " &p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "this->ptr_ = ACE_const_cast (" - << fname << "&,p).ptr_;" << be_nl; - *os << "return *this;" << be_uidt_nl; - *os << "}\n\n"; - - // assignment from _var is not allowed - - // assignment operator from _ptr - os->indent (); - *os << "ACE_INLINE " << fname << " &" << be_nl; - *os << fname << "::operator= (" << nodename - << "_slice *p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "this->ptr_ = p;" << be_nl; - *os << "return *this;" << be_uidt_nl; - *os << "}\n\n"; - - // other extra methods - cast operator () - os->indent (); - *os << "ACE_INLINE " << be_nl; - *os << fname << "::operator " << nodename - << "_slice *&() // cast" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - // ptr function - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *&" << be_nl; - *os << fname << "::ptr (void) // ptr" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - // operator [] instead of -> - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice &" << be_nl; - *os << fname << "::operator[] (CORBA::ULong index)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_[index];" << be_uidt_nl; - *os << "}\n\n"; - - return 0; -} - -int -be_visitor_array_ci::gen_forany_impl (be_array *node) -{ - TAO_OutStream *os = this->ctx_->stream (); // output stream - - char nodename [NAMEBUFSIZE]; // node name - char fname [NAMEBUFSIZE]; // to hold the full and - char lname [NAMEBUFSIZE]; // local names of the var - // save the node's local name and full name in a buffer for quick use later - // on - ACE_OS::memset (nodename, '\0', NAMEBUFSIZE); - ACE_OS::memset (fname, '\0', NAMEBUFSIZE); - ACE_OS::memset (lname, '\0', NAMEBUFSIZE); - if (this->ctx_->tdef ()) - { - // typedefed node - ACE_OS::sprintf (nodename, "%s", node->fullname ()); - ACE_OS::sprintf (fname, "%s_forany", node->fullname ()); - ACE_OS::sprintf (lname, "%s_forany", - node->local_name ()->get_string ()); - } - else - { - // for anonymous arrays ... - // we have to generate a name for us that has an underscope prepended to - // our local name. This needs to be inserted after the parents's name - if (node->is_nested ()) - { - be_decl *parent = be_scope::narrow_from_scope (node->defined_in ())->decl (); - ACE_OS::sprintf (nodename, "%s::_%s", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (fname, "%s::_%s_forany", parent->fullname (), - node->local_name ()->get_string ()); - ACE_OS::sprintf (lname, "_%s_forany", - node->local_name ()->get_string ()); - } - else - { - ACE_OS::sprintf (nodename, "_%s", node->fullname ()); - ACE_OS::sprintf (fname, "_%s_forany", node->fullname ()); - ACE_OS::sprintf (lname, "_%s_forany", - node->local_name ()->get_string ()); - } - } - - // generate the var implementation in the inline file - - os->indent (); // start with whatever was our current indent level - - *os << "// *************************************************************" - << be_nl; - *os << "// Inline operations for class " << fname << be_nl; - *os << "// *************************************************************\n\n"; - - // default constr - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << - " (void) // default constructor" << be_nl; - *os << " " << ": ptr_ ((" << nodename << "_slice *)0)," << be_nl; - *os << " nocopy_ (0)" << be_nl; - *os << "{}\n\n"; - - // constr from a _slice * - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (" << nodename << "_slice *p, " - << "CORBA::Boolean nocopy)" << be_nl; - *os << " : ptr_ (p)," << be_nl; - *os << " nocopy_ (nocopy)" << be_nl; - *os << "{}\n\n"; - - // copy constructor (deep copy) - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::" << lname << " (const " << fname - << " &p) // copy constructor" << be_nl; - *os << "{" << be_idt_nl; - *os << "this->ptr_ = " << nodename << "_dup (p.ptr_);" << be_nl; - *os << "this->nocopy_ = p.nocopy_;" << be_uidt_nl; - *os << "}\n\n"; - - // destructor - os->indent (); - *os << "ACE_INLINE" << be_nl; - *os << fname << "::~" << lname << " (void) // destructor" << be_nl; - *os << "{" << be_nl; - *os << " // don't do anything" << be_nl; - *os << "}\n\n"; - - // assignment operator - os->indent (); - *os << "ACE_INLINE " << fname << " &" << be_nl; - *os << fname << "::operator= (" << nodename - << "_slice *p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "// is what we own the same that is being assigned to us?" << - be_nl; - *os << "if (this->ptr_ != p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "// delete our stuff and assume ownership of p" << be_nl; - *os << nodename << "_free (this->ptr_);" << be_nl; - *os << "this->ptr_ = p;" << be_uidt_nl; - *os << "}" << be_nl; - *os << "return *this;" << be_uidt_nl; - *os << "}\n\n"; - - // assignment operator from _forany - os->indent (); - *os << "ACE_INLINE " << fname << " &" << be_nl; - *os << fname << "::operator= (const " << fname - << " &p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "if (this != &p)" << be_nl; - *os << "{" << be_idt_nl; - *os << "// not assigning to ourselves" << be_nl; - *os << nodename << "_free (this->ptr_); // free old stuff" << be_nl; - *os << "this->ptr_ = " << nodename - << "_dup (p.ptr_);// deep copy" << be_nl; - *os << "this->nocopy_ = p.nocopy_;" << be_uidt_nl; - *os << "}" << be_nl; - *os << "return *this;" << be_uidt_nl; - *os << "}\n\n"; - - // other extra methods - cast operators () - os->indent (); - *os << "ACE_INLINE " << be_nl; - *os << fname << "::operator " << nodename - << "_slice * const &() const // cast" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << be_nl; - *os << fname << "::operator " << nodename - << "_slice *&() // cast " << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - // two operator []s instead of -> - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice const &" << be_nl; - *os << fname << "::operator[] (CORBA::ULong index) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_[index];" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice &" << be_nl; - *os << fname << "::operator[] (CORBA::ULong index)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_[index];" << be_uidt_nl; - *os << "}\n\n"; - - // in, inout, out, and _retn - os->indent (); - *os << "ACE_INLINE const " << nodename << "_slice *" << be_nl; - *os << fname << "::in (void) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *" << be_nl; - *os << fname << "::inout (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice * &" << be_nl; - *os << fname << "::out (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *" << be_nl; - *os << fname << "::_retn (void)" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - // the additional ptr () member function - os->indent (); - *os << "ACE_INLINE " << nodename << "_slice *" << be_nl; - *os << fname << "::ptr (void) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->ptr_;" << be_uidt_nl; - *os << "}\n\n"; - - // the additional nocopy member function - os->indent (); - *os << "ACE_INLINE CORBA::Boolean" << be_nl; - *os << fname << "::nocopy (void) const" << be_nl; - *os << "{" << be_idt_nl; - *os << "return this->nocopy_;" << be_uidt_nl; - *os << "}\n\n"; - - return 0; -} - |