blob: f2b2d72216497882a91982b421e0a28cbca3ec8f (
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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
//
// $Id$
//
// ============================================================================
//
// = LIBRARY
// TAO IDL
//
// = FILENAME
// be_visitor_constant.cpp
//
// = DESCRIPTION
// Visitors for generation of code for Constant
//
// = AUTHOR
// Aniruddha Gokhale
//
// ============================================================================
#include "idl.h"
#include "idl_extern.h"
#include "be.h"
#include "be_visitor_constant.h"
// ********************************************************************
// Visitor implementation for the Constant type
// This one for the client header file
// ********************************************************************
be_visitor_constant_ch::be_visitor_constant_ch (be_visitor_context *ctx)
: be_visitor_decl (ctx)
{
}
be_visitor_constant_ch::~be_visitor_constant_ch (void)
{
}
// visit the Constant_Ch node and its scope
int
be_visitor_constant_ch::visit_constant (be_constant *node)
{
TAO_OutStream *os = this->ctx_->stream ();
if (!node->cli_hdr_gen ())
{
// if we are defined in the outermost scope, then the value is assigned
// to us here itself, else it will be in the *.cpp file
os->indent (); // start from whatever indentation level we were at
*os << "static const " << node->exprtype_to_string ()
<< " " << node->local_name ();
if (!node->is_nested ())
{
// We were defined at the outermost scope. So we put the value in the
// header itself
*os << " = " << node->constant_value ();
}
*os << ";\n\n";
node->cli_hdr_gen (I_TRUE);
}
return 0;
}
// ********************************************************************
// Visitor implementation for the Constant type
// This one for the client stubs file
// ********************************************************************
be_visitor_constant_cs::be_visitor_constant_cs (be_visitor_context *ctx)
: be_visitor_decl (ctx)
{
}
be_visitor_constant_cs::~be_visitor_constant_cs (void)
{
}
// visit the Constant_cs node and its scope
int
be_visitor_constant_cs::visit_constant (be_constant *node)
{
TAO_OutStream *os = this->ctx_->stream ();
if (!node->cli_hdr_gen ())
{
if (node->is_nested ())
{
// for those constants not defined in the outer most scope, they get
// assigned to their values in the impl file
os->indent (); // start from whatever indentation level we were at
*os << "const " << node->exprtype_to_string () << " " << node->name ()
<< " = " << node->constant_value () << ";\n\n";
}
node->cli_stub_gen (I_TRUE);
}
return 0;
}
|