blob: 3f98a2607f8dedd86dc37547691804729a14e6f5 (
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
|
// file : CCF/IDL2/SemanticAction/Impl/Struct.cpp
// author : Jeff Parsons <j.parsons@vanderbilt.edu>
// cvs-id : $Id$
#include "CCF/IDL2/SemanticAction/Impl/Struct.hpp"
#include <iostream>
using std::cerr;
using std::endl;
namespace CCF
{
namespace IDL2
{
namespace SemanticAction
{
namespace Impl
{
using namespace SemanticGraph;
Struct::
Struct (Context& c)
: ScopeBase<SemanticGraph::Struct> (c)
{
}
// @@ I need a mechanism for propagating exceptions from
// semantic actions to the parser in order to stop
// semantic action invocation.
//
void Struct::
begin_def (SimpleIdentifierPtr const& id)
{
if (ctx.trace ()) cerr << "struct def " << id << endl;
SimpleName name (id->lexeme ());
if (Nameable* s = lookup (ctx.tu (), ctx.scope (), name))
{
now (dynamic_cast<SemanticGraph::Struct&>(*s));
}
else
{
now (ctx.tu ().new_node<SemanticGraph::Struct> ());
}
ctx.tu ().new_edge<Defines> (ctx.scope (), now (), name);
}
void Struct::
begin_fwd (SimpleIdentifierPtr const& id)
{
if (ctx.trace ()) cerr << "struct fwd " << id << endl;
SimpleName name (id->lexeme ());
if (Nameable* s = lookup (ctx.tu (), ctx.scope (), name))
{
now (dynamic_cast<SemanticGraph::Struct&>(*s));
}
else
{
now (ctx.tu ().new_node<SemanticGraph::Struct> ());
}
ctx.tu ().new_edge<Mentions> (ctx.scope (), now (), name);
}
void Struct::
open_scope ()
{
if (ctx.trace ()) cerr << "scope open" << endl;
push (ctx.scope ());
ctx.scope (now ());
}
void Struct::
close_scope ()
{
ctx.scope (top ());
pop ();
if (ctx.trace ()) cerr << "scope close" << endl;
}
void Struct::
end ()
{
if (ctx.trace ()) cerr << "end" << endl;
}
}
}
}
}
|