summaryrefslogtreecommitdiff
path: root/TAO/orbsvcs/PSS/PSDL_Typecode_Defn.cpp
blob: cb458ae9528455c865a8ffff8940cd264b1966f7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
// $Id$

#include "PSDL_Typecode_Defn.h"
#include "PSDL_Stream.h"

ACE_RCSID(be_visitor_typecode, typecode_defn, "$Id$")


TAO_PSDL_Typecode_Defn::TAO_PSDL_Typecode_Defn ()
{
  // Constructor
}

TAO_PSDL_Typecode_Defn::~TAO_PSDL_Typecode_Defn ()
{
  // Destructor
}

int
TAO_PSDL_Typecode_Defn::visit_type_declarator (TAO_PSDL_Type_Declarator *type_declarator)
{
  ACE_UNUSED_ARG (type_declarator);
  // Get a pointer to PSDL_Stream of the stub implementation file
  TAO_PSDL_Stream *ps_si = TAO_PSDL_Scope::instance ()->get_si ();

  ps_si->indent (); // start from current indentation level

  // Generate the typecode information here
  *ps_si << "static const CORBA::Long _oc_";

  // Flat name generation.
  return 0;
}