1 files changed, 91 insertions, 0 deletions
diff --git a/TAO/TAO_IDL/be/be_argument.cpp b/TAO/TAO_IDL/be/be_argument.cpp
new file mode 100644
index 00000000000..c2c0774a91d
--- /dev/null
+++ b/TAO/TAO_IDL/be/be_argument.cpp
@@ -0,0 +1,91 @@
+// $Id$
+
+// ============================================================================
+//
+// = LIBRARY
+//    TAO IDL
+//
+// = FILENAME
+//    be_argument.cpp
+//
+// = DESCRIPTION
+//    Extension of class AST_Argument that provides additional means for C++
+//    mapping.
+//
+// = AUTHOR
+//    Copyright 1994-1995 by Sun Microsystems, Inc.
+//    and
+//    Aniruddha Gokhale
+//
+// ============================================================================
+
+#include "be_argument.h"
+#include "be_type.h"
+#include "be_visitor.h"
+#include "nr_extern.h"
+#include "global_extern.h"
+
+ACE_RCSID (be,
+           be_argument,
+           "$Id$")
+
+be_argument::be_argument (void)
+  : COMMON_Base (),
+    AST_Decl (),
+    AST_Field (),
+    AST_Argument (),
+    be_decl ()
+{
+}
+
+be_argument::be_argument (AST_Argument::Direction d,
+                          AST_Type *ft,
+                          UTL_ScopedName *n)
+  : COMMON_Base (),
+    AST_Decl (AST_Decl::NT_argument,
+              n),
+    AST_Field (AST_Decl::NT_argument,
+               ft,
+               n),
+    AST_Argument (d,
+                  ft,
+                  n),
+    be_decl (AST_Decl::NT_argument,
+             n)
+{
+  AST_Decl *dcl = ScopeAsDecl (this->defined_in ());
+
+  // If there have been previous errors, dcl may be 0,
+  // and we don't want to crash, so we check for non-zero.
+  // Also, we don't want to set the bit if the operation is
+  // declared in an included file UNLESS the enclosing
+  // interface is abstract, in which case we regenerate the
+  // operation.
+  if (dcl != 0
+      && !dcl->is_local ()
+      && (idl_global->in_main_file () || dcl->is_abstract ()))
+    {
+      be_type *bt = be_type::narrow_from_decl (ft);
+      bt->seen_in_operation (true);
+      this->set_arg_seen_bit (bt);
+      idl_global->need_skeleton_includes_ = true;
+    }
+}
+
+
+int
+be_argument::accept (be_visitor *visitor)
+{
+  return visitor->visit_argument (this);
+}
+
+void
+be_argument::destroy (void)
+{
+  this->be_decl::destroy ();
+  this->AST_Argument::destroy ();
+}
+
+// Narrowing.
+IMPL_NARROW_METHODS2 (be_argument, AST_Argument, be_decl)
+IMPL_NARROW_FROM_DECL (be_argument)