More small changes
[charm.git] / src / langs / charj / src / charj / translator / Charj.stg
1 group Charj;
2
3 charjSource_ci(pd, ids, tds, debug) ::= 
4 //<pd>
5 //<ids>
6 <<
7 <if(debug)>/* \<charjSource_ci> */<endif>
8 /*
9  * packageDeclaration disabled...
10 <pd>
11  * end packageDeclaration
12  */
13
14 /*
15  * importDeclarations disabled...
16 <ids>
17  * end importDeclarations
18  */
19
20 <tds>
21 <if(debug)>/* \</charjSource_ci> */<endif>
22
23 >>
24
25
26 charjSource_h(pd, ids, tds, cb, debug) ::= 
27 <<
28 <if(debug)>/* \<CHARJ_SOURCE> */<endif>
29 /**************************************************************************
30  * WARNING                                                                *
31  **************************************************************************
32  * This is a machine generated header file.                               *
33  * It is not meant to be edited by hand and may be overwritten by charjc. *
34  **************************************************************************/
35
36 <pd>
37 <ids>
38 <tds>
39 <cb>
40
41 <if(debug)>/* \</CHARJ_SOURCE> */<endif>
42
43 >>
44
45
46 charjSource_cc(pd, ids, tds, cb, debug) ::= 
47 <<
48 <if(debug)>/* \<CHARJ_SOURCE> */<endif>
49 <ids>
50 <pd>
51 <tds>
52 <cb>
53 <if(debug)>/* \</CHARJ_SOURCE> */<endif>
54
55 >>
56
57 packageDeclaration_cc_h(ids) ::= 
58 <<
59 <if(debug)>/* \<packageDeclaration> */<endif>
60 namespace <ids; separator=" { namespace "> {
61 <if(debug)>/* \</packageDeclaration> */<endif>
62 >>
63
64 importDeclaration_cc_h(inc_id, use_id) ::= 
65 <<
66 <if(debug)>/* \<importDeclaration> */<endif>
67 #include \<<inc_id>\>
68 using <use_id>;
69 <if(debug)>/* \</importDeclaration> */<endif>
70 >>
71
72 classExtends_ci(type) ::= "<type>"
73
74
75 classExtends_cc_h(type) ::= "#include \<<type>.h\>"
76
77
78 interfaceExtends(ts) ::=
79 <<
80 : public <ts; separator=", public ">
81 >>
82
83 classDeclaration_h(ident, ext, csds) ::=
84 <<
85 /* superclass: <ext> */
86 class <ident>: public CBase_<ident> {
87     <csds; separator="\n">
88 };
89 >>
90
91 classWrapper_h(ident, ext, csds, class1) ::=
92 <<
93 <if(debug)>/* \<typeDeclaration> */<endif>
94
95 #include "<ident>.decl.h"
96
97 <classDeclaration_h(ident=ident, ext=ext, csds=csds)>
98
99 <if(debug)>/* \</typeDeclaration> */<endif>
100 >>
101
102 templateDeclaration_h(tident, ident, ext, csds) ::=
103 <<
104 #include "<ident>.decl.h"
105 template \<class <tident; separator=", class ">\>
106 <classDeclaration_h(ident=ident, ext=ext, csds=csds)>
107 >>
108
109 classDeclaration_cc(ident, ext, csds) ::=
110 <<
111 <if(debug)>/* \<typeDeclaration> */<endif>
112
113
114 #include "<ident>.decl.h"
115 /* superclass: <ext> */
116 class <ident>: public CBase_<ident> {
117     <csds; separator="\n">
118 };
119 #include "<ident>.def.h"
120 <if(debug)>/* \</typeDeclaration> */<endif>
121
122 >>
123
124
125 charedeclaration_ci(chareType, arrayDim, ident, ext, csds) ::=
126 <<
127 <if(debug)>/* \<typeDeclaration> */<endif>
128 module <ident> {
129 <if(ext)>
130     extern module <ext>;
131     <chareType><if(arrayDim)> [<arrayDim>]<endif> <ident>: <ext> {
132 <else>
133     <chareType><if(arrayDim)> [<arrayDim>]<endif> <ident> {
134 <endif>
135         <csds; separator="\n">
136     }
137 }
138
139 <if(debug)>/* \</typeDeclaration> */<endif>
140
141 >>
142
143
144 funcMethodDecl_h(modl, gtpl, ty, id, fpl, adl, block) ::=
145 <<
146 <if(modl)><modl>: <endif><ty> <gtpl> <id><fpl> <adl>;
147 >>
148
149
150 funcMethodDecl_ci(modl, gtpl, ty, id, fpl, adl, block) ::=
151 <<
152 entry <ty> <gtpl> <id><fpl> <adl>;
153 >>
154
155
156 funcMethodDecl_cc(modl, gtpl, ty, id, fpl, adl, block) ::=
157 <<
158 <if(modl)><modl>: <endif><ty> <gtpl> <id><fpl> <adl> {
159     <block>
160 }
161 >>
162
163
164 voidMethodDecl_ci(modl, gtpl, id, fpl, block) ::=
165 <<
166 entry void<gtpl> <id><fpl>;
167 >>
168
169
170 voidMethodDecl_h(modl, gtpl, id, fpl, block) ::=
171 <<
172 <if(modl)><modl>: <endif>void<gtpl> <id><fpl>;
173 >>
174
175
176 voidMethodDecl_cc(modl, gtpl, id, fpl, block) ::=
177 <<
178 <if(modl)><modl>: <endif>void<gtpl> <id><fpl> {
179     <block>
180 }
181 >>
182
183
184 ctorDecl_ci(modl, gtpl, id, fpl, block) ::=
185 <<
186 entry void<gtpl> <id><fpl>;
187 >>
188
189
190 ctorDecl_h(modl, gtpl, id, fpl, block) ::=
191 <<
192 <if(modl)><modl>:<endif><gtpl> <id><fpl>;
193 >>
194
195
196 ctorDecl_cc(modl, gtpl, id, fpl, block) ::=
197 <<
198 <if(modl)><modl>:<endif><gtpl> <id><fpl> {
199     <block>
200 }
201 >>
202
203
204 block_cc(bsl) ::=
205 <<
206 <bsl:{s| <s><\n>}>
207 >>
208
209
210 embed_cc(str, blk) ::=
211 <<
212 // begin embedded block: <str>
213 <blk>
214 // end embedded block: <str>
215 >>
216
217
218 class_var_decl(modl, type, declList) ::=
219 <<
220 <if(modl)>
221 <modl>:
222 <else>
223 public: 
224 <endif>
225 <type> <declList>;
226 >>
227
228
229 var_decl_list(var_decls) ::=
230 <<
231 <var_decls; separator=", ">
232 >>
233
234
235 var_decl(id, initializer) ::=
236 <<
237 <id><if(initializer)> = <initializer><endif>
238 >>
239
240
241 var_decl_id(id, domainExp) ::=
242 <<
243 <id><if(domainExp)>(<domainExp>)<endif>
244 >>
245
246
247 var_id_decl(id, adl) ::=
248 <<
249 <id><if(adl)> <adl><endif>
250 >>
251
252
253 mod_list(mods) ::=
254 <<
255 <if(mods)><mods; separator=" "><endif>
256 >>
257
258
259 local_mod_list(mods) ::=
260 <<
261 <if(mods)><mods; separator=" "><endif>
262 >>
263  
264
265 local_var_decl(modList, type, declList, domainExps) ::=
266 <<
267 <if(modList)>
268 <modList> <type> <declList>
269 <else>
270 <type> <declList>;
271 <endif>
272 >>
273
274
275 type(typeID, arrDeclList) ::=
276 <<
277 <typeID><arrDeclList>
278 >>
279
280
281 typeIdent(typeID, generics) ::=
282 <<
283 <typeID><generics>
284 >>
285
286
287 generic_arg_list(types) ::=
288 <<
289 \<<types>\>
290 >>
291
292
293 formal_param_list(sdecl, vdecl) ::=
294 <<
295 <if(vdecl)>
296 (<sdecl; separator=", ">, <vdecl>)
297 <else>
298 (<sdecl; separator=", ">)
299 <endif>
300 >>
301
302
303 formal_param_decl(modList, type, declID) ::=
304 <<
305 <if(modList)><modList> <endif><type> <declID>
306 >>
307
308
309 assert(cond, msg) ::=
310 <<
311 <if(msg)>
312 CkAssert(<cond> && <msg>);
313 <else>
314 CkAssert(<cond>);
315 <endif>
316 >>
317
318
319 if(cond, then, else_) ::=
320 <<
321 if <cond> {
322     <then>
323 }<if(else_)> else {
324     <else_>
325 }<endif>
326 >>
327
328
329 for(initializer, cond, update, body) ::=
330 <<
331 for (<initializer> <cond> <update>) {
332     <body>
333 }
334 >>
335
336 while(cond, body) ::=
337 <<
338 while <cond> {
339     <body>
340
341 >>
342
343 dowhile(cond, body) ::=
344 <<
345 do {
346     <body>
347 } while <cond>;
348 >>
349
350
351 switch(expr, labels) ::=
352 <<
353 switch <expr> {
354     <labels>
355 }
356 >>
357
358 return(val) ::=
359 <<
360 return<if(val)> <val><endif>;
361 >>
362
363 label(text, stmt) ::=
364 <<
365 <text>: <stmt>
366 >>
367
368 case(expr, block) ::=
369 <<
370 case <expr>: <block>
371 >>
372
373 for_cond(expr) ::=
374 <<
375 <expr>
376 >>
377
378 for_update(exprs) ::=
379 <<
380 <exprs; separator=", ">
381 >>
382
383 method_call(primary, generic_types, args) ::=
384 <<
385 <if(generic_types)>
386 <primary>\<<generic_types>\>(<args>)
387 <else>
388 <primary>(<args>)
389 <endif>
390 >>
391
392
393 array_construction_with_init(array_decls, initializer) ::=
394 <<
395 <array_decls> = {<initializer>};
396 >>
397
398
399 array_construction(exprs, array_decls) ::=
400 <<
401 [<exprs; separator="][">]<array_decls>
402 >> 
403
404
405 arguments(exprs) ::=
406 <<
407 <exprs; separator=", ">
408 >>
409
410 range_constructor(range, others, len) ::=
411 <<
412 <if(range)>
413 Domain\<<len>\>(<range>)<if(others)>, <others; separator=", "><endif>
414 <else>
415 <endif>
416 >>