Charj: improve "include" formatting and add charm++.h by default
[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, 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
40 <if(debug)>/* \</CHARJ_SOURCE> */<endif>
41
42 >>
43
44
45 charjSource_cc(pd, ids, tds, debug) ::=
46 <<
47 <if(debug)>/* \<CHARJ_SOURCE> */<endif>
48 <ids>
49 <pd>
50 <tds>
51 <if(debug)>/* \</CHARJ_SOURCE> */<endif>
52
53 >>
54
55 importDeclaration_cc_h(inc_id, use_id) ::= 
56 <<
57 <if(debug)>/* \<importDeclaration> */<endif>
58 #include \<<inc_id>\>
59 using <use_id>;
60 <if(debug)>/* \</importDeclaration> */<endif>
61 >>
62
63 classExtends_ci(type) ::= "<type>"
64
65
66 classExtends_cc_h(type) ::= "#include \<<type>.h\>"
67
68
69 interfaceExtends(ts) ::=
70 <<
71 : public <ts; separator=", public ">
72 >>
73
74 classDeclaration_h(sym, ident, ext, csds) ::=
75 <<
76 <sym.IncludeString>
77 <sym.NamespaceOpeningString>
78 <if(ext)>
79 class <ident> : public <ext> {
80 <else>
81 class <ident> {
82 <endif>
83
84     <csds; separator="\n">
85 };
86 <sym.NamespaceClosingString>
87
88 >>
89
90 classDeclaration_cc(sym, ident, ext, csds) ::=
91 <<
92 <sym.IncludeString>
93 <sym.NamespaceOpeningString>
94 <if(ext)>
95 class <ident>: public <ext> {
96 <else>
97 class <ident> {
98 <endif>
99
100     <csds; separator="\n">
101 };
102 <sym.NamespaceClosingString>
103
104 >>
105
106 chareDeclaration_cc(sym, ident, ext, csds) ::=
107 <<
108
109 #include "<ident>.decl.h"
110 <sym.NamespaceOpeningString>
111 /* superclass: <ext> */
112 class <ident>: public CBase_<ident> {
113     <csds; separator="\n">
114 };
115 <sym.NamespaceClosingString>
116 #include "<ident>.def.h"
117 >>
118
119 chareDeclaration_h(sym, ident, ext, csds) ::=
120 <<
121 #include "<ident>.decl.h"
122 <sym.NamespaceOpeningString>
123 /* superclass: <ext> */
124 class <ident>: public CBase_<ident> {
125     <csds; separator="\n">
126 };
127 <sym.NamespaceClosingString>
128 >>
129
130 chareDeclaration_ci(sym, chareType, arrayDim, ident, ext, csds) ::=
131 <<
132 <if(debug)>/* \<typeDeclaration> */<endif>
133 module <ident> {
134 <if(ext)>
135     extern module <ext>;
136 <endif>
137     <sym.NamespaceOpeningString>
138     <chareType><if(arrayDim)> [<arrayDim>]<endif> <ident><if(ext)> : <ext><endif> {
139         <csds; separator="\n">
140     }
141     <sym.NamespaceClosingString>
142 }
143
144 <if(debug)>/* \</typeDeclaration> */<endif>
145
146 >>
147
148
149 funcMethodDecl_h(modl, gtpl, ty, id, fpl, adl, block) ::=
150 <<
151 <if(modl)><modl>: <endif><ty> <gtpl> <id><fpl> <adl>;
152 >>
153
154
155 funcMethodDecl_ci(modl, gtpl, ty, id, fpl, adl, block) ::=
156 <<
157 entry <ty> <gtpl> <id><fpl> <adl>;
158 >>
159
160
161 funcMethodDecl_cc(modl, gtpl, ty, id, fpl, adl, block) ::=
162 <<
163 <if(modl)><modl>: <endif><ty> <gtpl> <id><fpl> <adl> {
164     <block>
165 }
166 >>
167
168
169 voidMethodDecl_ci(modl, gtpl, id, fpl, block) ::=
170 <<
171 entry void<gtpl> <id><fpl>;
172 >>
173
174
175 voidMethodDecl_h(modl, gtpl, id, fpl, block) ::=
176 <<
177 <if(modl)><modl>: <endif>void<gtpl> <id><fpl>;
178 >>
179
180
181 voidMethodDecl_cc(modl, gtpl, id, fpl, block) ::=
182 <<
183 <if(modl)><modl>: <endif>void<gtpl> <id><fpl> {
184     <block>
185 }
186 >>
187
188
189 ctorDecl_ci(modl, gtpl, id, fpl, block) ::=
190 <<
191 entry void<gtpl> <id><fpl>;
192 >>
193
194
195 ctorDecl_h(modl, gtpl, id, fpl, block) ::=
196 <<
197 <if(modl)><modl>:<endif><gtpl> <id><fpl>;
198 >>
199
200
201 ctorDecl_cc(modl, gtpl, id, fpl, block) ::=
202 <<
203 <if(modl)><modl>:<endif><gtpl> <id><fpl> {
204     <block>
205 }
206 >>
207
208
209 block_cc(bsl) ::=
210 <<
211 <bsl:{s| <s><\n>}>
212 >>
213
214
215 embed_cc(str, blk) ::=
216 <<
217 // begin embedded block: <str>
218 <blk>
219 // end embedded block: <str>
220 >>
221
222
223 class_var_decl(modl, type, declList) ::=
224 <<
225 <if(modl)><modl>:<else>public:<endif> <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, array_decl_list) ::=
242 <<
243 <id><if(array_decl_list)> <array_decl_list><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) ::=
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 (<if(initializer)><initializer><else>;<endif> <cond>; <update; separator=", ">) {
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 method_call(primary, generic_types, args) ::=
374 <<
375 <if(generic_types)>
376 <primary>\<<generic_types>\>(<args>)
377 <else>
378 <primary>(<args>)
379 <endif>
380 >>
381
382
383 array_construction_with_init(array_decls, initializer) ::=
384 <<
385 <array_decls> = {<initializer>};
386 >>
387
388
389 array_construction(exprs, array_decls) ::=
390 <<
391 [<exprs; separator="][">]<array_decls>
392 >> 
393
394
395 arguments(exprs) ::=
396 <<
397 <exprs; separator=", ">
398 >>
399
400