TAO/TAO_IDL/ast/ast_connector.cpp

   1 #include "ast_connector.h"
   2 #include "ast_visitor.h"
   3 #include "utl_identifier.h"
   4 #include "utl_indenter.h"
   5 #include "utl_err.h"
   6 #include "global_extern.h"
   7
   8 AST_Decl::NodeType const
   9 AST_Connector::NT = AST_Decl::NT_connector;
  10
  11 AST_Connector::AST_Connector (
  12       UTL_ScopedName *n,
  13       AST_Connector *base_connector)
  14   : COMMON_Base (false,
  15                  false),
  16     AST_Decl (AST_Decl::NT_connector,
  17               n),
  18     AST_Type (AST_Decl::NT_connector,
  19               n),
  20     UTL_Scope (AST_Decl::NT_connector),
  21     AST_Interface (n,
  22                    0,
  23                    0,
  24                    0,
  25                    0,
  26                    false,
  27                    false),
  28     AST_Component (n,
  29                    base_connector,
  30                    0,
  31                    0,
  32                    0,
  33                    0)
  34 {
  35   if (!this->imported ())
  36     {
  37       idl_global->connector_seen_ = true;
  38     }
  39 }
  40
  41 AST_Connector::~AST_Connector (void)
  42 {
  43 }
  44
  45 AST_Connector *
  46 AST_Connector::base_connector (void) const
  47 {
  48   return AST_Connector::narrow_from_decl (this->pd_base_component);
  49 }
  50
  51 void
  52 AST_Connector::destroy (void)
  53 {
  54   this->AST_Component::destroy ();
  55 }
  56
  57 void
  58 AST_Connector::dump (ACE_OSTREAM_TYPE &o)
  59 {
  60   this->dump_i (o, "connector ");
  61
  62   this->local_name ()->dump (o);
  63
  64   this->dump_i (o, " ");
  65
  66   if (this->pd_base_component != 0)
  67     {
  68       this->dump_i (o, ": ");
  69       this->pd_base_component->local_name ()->dump (o);
  70     }
  71
  72   this->dump_i (o, " {\n");
  73
  74   UTL_Scope::dump (o);
  75   idl_global->indent ()->skip_to (o);
  76
  77   this->dump_i (o, "}");
  78 }
  79
  80 int
  81 AST_Connector::ast_accept (ast_visitor *visitor)
  82 {
  83   return visitor->visit_connector (this);
  84 }
  85
  86 IMPL_NARROW_FROM_DECL (AST_Connector)
  87 IMPL_NARROW_FROM_SCOPE (AST_Connector)