|
1
|
1
|
|
|
2 // Copyright (c) 1999-2005 by Digital Mars
|
|
|
3 // All Rights Reserved
|
|
|
4 // written by Walter Bright
|
|
|
5 // http://www.digitalmars.com
|
|
|
6 // License for redistribution is by either the Artistic License
|
|
|
7 // in artistic.txt, or the GNU General Public License in gnu.txt.
|
|
|
8 // See the included readme.txt for details.
|
|
|
9
|
|
|
10 #include <stdio.h>
|
|
|
11 #include <assert.h>
|
|
|
12
|
|
|
13 #include "root.h"
|
|
|
14
|
|
|
15 #include "identifier.h"
|
|
|
16 #include "dsymbol.h"
|
|
|
17 #include "cond.h"
|
|
|
18 #include "version.h"
|
|
|
19 #include "module.h"
|
|
|
20
|
|
|
21 /* ================================================== */
|
|
|
22
|
|
|
23 /* DebugSymbol's happen for statements like:
|
|
|
24 * debug = identifier;
|
|
|
25 * debug = integer;
|
|
|
26 */
|
|
|
27
|
|
|
28 DebugSymbol::DebugSymbol(Loc loc, Identifier *ident)
|
|
|
29 : Dsymbol(ident)
|
|
|
30 {
|
|
|
31 this->loc = loc;
|
|
|
32 }
|
|
|
33
|
|
|
34 DebugSymbol::DebugSymbol(Loc loc, unsigned level)
|
|
|
35 : Dsymbol()
|
|
|
36 {
|
|
|
37 this->level = level;
|
|
|
38 this->loc = loc;
|
|
|
39 }
|
|
|
40
|
|
|
41 Dsymbol *DebugSymbol::syntaxCopy(Dsymbol *s)
|
|
|
42 {
|
|
|
43 assert(!s);
|
|
|
44 DebugSymbol *ds = new DebugSymbol(loc, ident);
|
|
|
45 ds->level = level;
|
|
|
46 return ds;
|
|
|
47 }
|
|
|
48
|
|
|
49 int DebugSymbol::addMember(Scope *sc, ScopeDsymbol *sd, int memnum)
|
|
|
50 {
|
|
|
51 //printf("DebugSymbol::addMember('%s') %s\n", sd->toChars(), toChars());
|
|
|
52 Module *m;
|
|
|
53
|
|
|
54 // Do not add the member to the symbol table,
|
|
|
55 // just make sure subsequent debug declarations work.
|
|
|
56 m = sd->isModule();
|
|
|
57 if (ident)
|
|
|
58 {
|
|
|
59 if (!m)
|
|
|
60 error("declaration must be at module level");
|
|
|
61 else
|
|
|
62 {
|
|
|
63 if (findCondition(m->debugidsNot, ident))
|
|
|
64 error("defined after use");
|
|
|
65 if (!m->debugids)
|
|
|
66 m->debugids = new Array();
|
|
|
67 m->debugids->push(ident->toChars());
|
|
|
68 }
|
|
|
69 }
|
|
|
70 else
|
|
|
71 {
|
|
|
72 if (!m)
|
|
|
73 error("level declaration must be at module level");
|
|
|
74 else
|
|
|
75 m->debuglevel = level;
|
|
|
76 }
|
|
|
77 return 0;
|
|
|
78 }
|
|
|
79
|
|
|
80 void DebugSymbol::semantic(Scope *sc)
|
|
|
81 {
|
|
|
82 //printf("DebugSymbol::semantic() %s\n", toChars());
|
|
|
83 }
|
|
|
84
|
|
|
85 void DebugSymbol::toCBuffer(OutBuffer *buf, HdrGenState *hgs)
|
|
|
86 {
|
|
|
87 buf->writestring("debug = ");
|
|
|
88 if (ident)
|
|
|
89 buf->writestring(ident->toChars());
|
|
|
90 else
|
|
|
91 buf->printf("%u", level);
|
|
|
92 buf->writestring(";");
|
|
|
93 buf->writenl();
|
|
|
94 }
|
|
|
95
|
|
336
|
96 const char *DebugSymbol::kind()
|
|
1
|
97 {
|
|
|
98 return "debug";
|
|
|
99 }
|
|
|
100
|
|
|
101 /* ================================================== */
|
|
|
102
|
|
|
103 /* VersionSymbol's happen for statements like:
|
|
|
104 * version = identifier;
|
|
|
105 * version = integer;
|
|
|
106 */
|
|
|
107
|
|
|
108 VersionSymbol::VersionSymbol(Loc loc, Identifier *ident)
|
|
|
109 : Dsymbol(ident)
|
|
|
110 {
|
|
|
111 this->loc = loc;
|
|
|
112 }
|
|
|
113
|
|
|
114 VersionSymbol::VersionSymbol(Loc loc, unsigned level)
|
|
|
115 : Dsymbol()
|
|
|
116 {
|
|
|
117 this->level = level;
|
|
|
118 this->loc = loc;
|
|
|
119 }
|
|
|
120
|
|
|
121 Dsymbol *VersionSymbol::syntaxCopy(Dsymbol *s)
|
|
|
122 {
|
|
|
123 assert(!s);
|
|
|
124 VersionSymbol *ds = new VersionSymbol(loc, ident);
|
|
|
125 ds->level = level;
|
|
|
126 return ds;
|
|
|
127 }
|
|
|
128
|
|
|
129 int VersionSymbol::addMember(Scope *sc, ScopeDsymbol *sd, int memnum)
|
|
|
130 {
|
|
|
131 //printf("VersionSymbol::addMember('%s') %s\n", sd->toChars(), toChars());
|
|
|
132 Module *m;
|
|
|
133
|
|
|
134 // Do not add the member to the symbol table,
|
|
|
135 // just make sure subsequent debug declarations work.
|
|
|
136 m = sd->isModule();
|
|
|
137 if (ident)
|
|
|
138 {
|
|
|
139 VersionCondition::checkPredefined(loc, ident->toChars());
|
|
|
140 if (!m)
|
|
|
141 error("declaration must be at module level");
|
|
|
142 else
|
|
|
143 {
|
|
|
144 if (findCondition(m->versionidsNot, ident))
|
|
|
145 error("defined after use");
|
|
|
146 if (!m->versionids)
|
|
|
147 m->versionids = new Array();
|
|
|
148 m->versionids->push(ident->toChars());
|
|
|
149 }
|
|
|
150 }
|
|
|
151 else
|
|
|
152 {
|
|
|
153 if (!m)
|
|
|
154 error("level declaration must be at module level");
|
|
|
155 else
|
|
|
156 m->versionlevel = level;
|
|
|
157 }
|
|
|
158 return 0;
|
|
|
159 }
|
|
|
160
|
|
|
161 void VersionSymbol::semantic(Scope *sc)
|
|
|
162 {
|
|
|
163 }
|
|
|
164
|
|
|
165 void VersionSymbol::toCBuffer(OutBuffer *buf, HdrGenState *hgs)
|
|
|
166 {
|
|
|
167 buf->writestring("version = ");
|
|
|
168 if (ident)
|
|
|
169 buf->writestring(ident->toChars());
|
|
|
170 else
|
|
|
171 buf->printf("%u", level);
|
|
|
172 buf->writestring(";");
|
|
|
173 buf->writenl();
|
|
|
174 }
|
|
|
175
|
|
336
|
176 const char *VersionSymbol::kind()
|
|
1
|
177 {
|
|
|
178 return "version";
|
|
|
179 }
|
|
|
180
|
|
|
181
|
