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
|
//=============================================================================
/**
* @file be_argument.cpp
*
* $Id$
*
* Extension of class AST_Argument that provides additional means for C++
* mapping.
*
*
* @author Copyright 1994-1995 by Sun Microsystems
* @author Inc. and Aniruddha Gokhale
*/
//=============================================================================
#include "be_argument.h"
#include "be_type.h"
#include "be_visitor.h"
#include "nr_extern.h"
#include "global_extern.h"
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 ();
}
IMPL_NARROW_FROM_DECL (be_argument)
|
