source: src/SynTree/Visitor.cc @ 5809461

aaron-thesisarm-ehcleanup-dtorsdeferred_resndemanglerjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprnew-envno_listpersistent-indexerresolv-newwith_gc
Last change on this file since 5809461 was 5809461, checked in by Rob Schluntz <rschlunt@…>, 4 years ago

Fix handling of GCC label address and computed goto

  • Property mode set to 100644
File size: 14.8 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// Visitor.cc --
8//
9// Author           : Richard C. Bilson
10// Created On       : Mon May 18 07:44:20 2015
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Thu Aug 17 15:39:38 2017
13// Update Count     : 29
14//
15
16#include <cassert>        // for assert
17#include <list>           // for list
18
19#include "Constant.h"     // for Constant
20#include "Declaration.h"  // for DeclarationWithType, ObjectDecl, Declaration
21#include "Expression.h"   // for Expression, ConstantExpr, ImplicitCopyCtorExpr
22#include "Initializer.h"  // for Initializer, Designation, ConstructorInit
23#include "Statement.h"    // for Statement, CatchStmt, AsmStmt, CompoundStmt
24#include "Type.h"         // for Type, Type::ForallList, AttrType, FunctionType
25#include "Visitor.h"
26
27class Subrange;
28
29Visitor::Visitor() {}
30
31Visitor::~Visitor() {}
32
33void Visitor::visit( ObjectDecl *objectDecl ) {
34        maybeAccept( objectDecl->get_type(), *this );
35        maybeAccept( objectDecl->get_init(), *this );
36        maybeAccept( objectDecl->get_bitfieldWidth(), *this );
37}
38
39void Visitor::visit( FunctionDecl *functionDecl ) {
40        maybeAccept( functionDecl->get_functionType(), *this );
41        maybeAccept( functionDecl->get_statements(), *this );
42}
43
44void Visitor::handleAggregateDecl( AggregateDecl *aggregateDecl ) {
45        acceptAll( aggregateDecl->get_parameters(), *this );
46        acceptAll( aggregateDecl->get_members(), *this );
47}
48
49void Visitor::visit( StructDecl *aggregateDecl ) {
50        handleAggregateDecl( static_cast< AggregateDecl* >( aggregateDecl ) );
51}
52
53void Visitor::visit( UnionDecl *aggregateDecl ) {
54        handleAggregateDecl( static_cast< AggregateDecl* >( aggregateDecl ) );
55}
56
57void Visitor::visit( EnumDecl *aggregateDecl ) {
58        handleAggregateDecl( static_cast< AggregateDecl* >( aggregateDecl ) );
59}
60
61void Visitor::visit( TraitDecl *aggregateDecl ) {
62        handleAggregateDecl( static_cast< AggregateDecl* >( aggregateDecl ) );
63}
64
65void Visitor::handleNamedTypeDecl( NamedTypeDecl *typeDecl ) {
66        acceptAll( typeDecl->get_parameters(), *this );
67        acceptAll( typeDecl->get_assertions(), *this );
68        maybeAccept( typeDecl->get_base(), *this );
69}
70
71void Visitor::visit( TypeDecl *typeDecl ) {
72        handleNamedTypeDecl( static_cast< NamedTypeDecl* >( typeDecl ) );
73        maybeAccept( typeDecl->get_init(), *this );
74}
75
76void Visitor::visit( TypedefDecl *typeDecl ) {
77        handleNamedTypeDecl( static_cast< NamedTypeDecl* >( typeDecl ) );
78}
79
80void Visitor::visit( AsmDecl *asmDecl ) {
81        maybeAccept( asmDecl->get_stmt(), *this );
82}
83
84
85void Visitor::visit( CompoundStmt *compoundStmt ) {
86        acceptAll( compoundStmt->get_kids(), *this );
87}
88
89void Visitor::visit( ExprStmt *exprStmt ) {
90        maybeAccept( exprStmt->get_expr(), *this );
91}
92
93void Visitor::visit( AsmStmt *asmStmt ) {
94        maybeAccept( asmStmt->get_instruction(), *this );
95        acceptAll( asmStmt->get_output(), *this );
96        acceptAll( asmStmt->get_input(), *this );
97        acceptAll( asmStmt->get_clobber(), *this );
98}
99
100void Visitor::visit( IfStmt *ifStmt ) {
101        acceptAll( ifStmt->get_initialization(), *this );
102        maybeAccept( ifStmt->get_condition(), *this );
103        maybeAccept( ifStmt->get_thenPart(), *this );
104        maybeAccept( ifStmt->get_elsePart(), *this );
105}
106
107void Visitor::visit( WhileStmt *whileStmt ) {
108        maybeAccept( whileStmt->get_condition(), *this );
109        maybeAccept( whileStmt->get_body(), *this );
110}
111
112void Visitor::visit( ForStmt *forStmt ) {
113        acceptAll( forStmt->get_initialization(), *this );
114        maybeAccept( forStmt->get_condition(), *this );
115        maybeAccept( forStmt->get_increment(), *this );
116        maybeAccept( forStmt->get_body(), *this );
117}
118
119void Visitor::visit( SwitchStmt *switchStmt ) {
120        maybeAccept( switchStmt->get_condition(), *this );
121        acceptAll( switchStmt->get_statements(), *this );
122}
123
124void Visitor::visit( CaseStmt *caseStmt ) {
125        maybeAccept( caseStmt->get_condition(), *this );
126        acceptAll( caseStmt->get_statements(), *this );
127}
128
129void Visitor::visit( __attribute__((unused)) BranchStmt *branchStmt ) {
130}
131
132void Visitor::visit( ReturnStmt *returnStmt ) {
133        maybeAccept( returnStmt->get_expr(), *this );
134}
135
136void Visitor::visit( ThrowStmt * throwStmt ) {
137        maybeAccept( throwStmt->get_expr(), *this );
138        maybeAccept( throwStmt->get_target(), *this );
139}
140
141void Visitor::visit( TryStmt *tryStmt ) {
142        maybeAccept( tryStmt->get_block(), *this );
143        acceptAll( tryStmt->get_catchers(), *this );
144        maybeAccept( tryStmt->get_finally(), *this );
145}
146
147void Visitor::visit( CatchStmt *catchStmt ) {
148        maybeAccept( catchStmt->get_decl(), *this );
149        maybeAccept( catchStmt->get_cond(), *this );
150        maybeAccept( catchStmt->get_body(), *this );
151}
152
153void Visitor::visit( FinallyStmt *finalStmt ) {
154        maybeAccept( finalStmt->get_block(), *this );
155}
156
157void Visitor::visit( WaitForStmt *waitforStmt ) {
158        for( auto & clause : waitforStmt->clauses ) {
159                maybeAccept( clause.target.function, *this );
160                acceptAll( clause.target.arguments, *this );
161
162                maybeAccept( clause.statement, *this );
163                maybeAccept( clause.condition, *this );
164        }
165
166        maybeAccept( waitforStmt->timeout.time, *this );
167        maybeAccept( waitforStmt->timeout.statement, *this );
168        maybeAccept( waitforStmt->timeout.condition, *this );
169        maybeAccept( waitforStmt->orelse.statement, *this );
170        maybeAccept( waitforStmt->orelse.condition, *this );
171}
172
173void Visitor::visit( __attribute__((unused)) NullStmt *nullStmt ) {
174}
175
176void Visitor::visit( DeclStmt *declStmt ) {
177        maybeAccept( declStmt->get_decl(), *this );
178}
179
180void Visitor::visit( ImplicitCtorDtorStmt *impCtorDtorStmt ) {
181        maybeAccept( impCtorDtorStmt->get_callStmt(), *this );
182}
183
184
185void Visitor::visit( ApplicationExpr *applicationExpr ) {
186        maybeAccept( applicationExpr->get_result(), *this );
187        maybeAccept( applicationExpr->get_function(), *this );
188        acceptAll( applicationExpr->get_args(), *this );
189}
190
191void Visitor::visit( UntypedExpr *untypedExpr ) {
192        maybeAccept( untypedExpr->get_result(), *this );
193        acceptAll( untypedExpr->get_args(), *this );
194}
195
196void Visitor::visit( NameExpr *nameExpr ) {
197        maybeAccept( nameExpr->get_result(), *this );
198}
199
200void Visitor::visit( AddressExpr *addressExpr ) {
201        maybeAccept( addressExpr->get_result(), *this );
202        maybeAccept( addressExpr->get_arg(), *this );
203}
204
205void Visitor::visit( LabelAddressExpr *labAddressExpr ) {
206        maybeAccept( labAddressExpr->get_result(), *this );
207}
208
209void Visitor::visit( CastExpr *castExpr ) {
210        maybeAccept( castExpr->get_result(), *this );
211        maybeAccept( castExpr->get_arg(), *this );
212}
213
214void Visitor::visit( VirtualCastExpr *castExpr ) {
215        maybeAccept( castExpr->get_result(), *this );
216        maybeAccept( castExpr->get_arg(), *this );
217}
218
219void Visitor::visit( UntypedMemberExpr *memberExpr ) {
220        maybeAccept( memberExpr->get_result(), *this );
221        maybeAccept( memberExpr->get_aggregate(), *this );
222        maybeAccept( memberExpr->get_member(), *this );
223}
224
225void Visitor::visit( MemberExpr *memberExpr ) {
226        maybeAccept( memberExpr->get_result(), *this );
227        maybeAccept( memberExpr->get_aggregate(), *this );
228}
229
230void Visitor::visit( VariableExpr *variableExpr ) {
231        maybeAccept( variableExpr->get_result(), *this );
232}
233
234void Visitor::visit( ConstantExpr *constantExpr ) {
235        maybeAccept( constantExpr->get_result(), *this );
236        maybeAccept( constantExpr->get_constant(), *this );
237}
238
239void Visitor::visit( SizeofExpr *sizeofExpr ) {
240        maybeAccept( sizeofExpr->get_result(), *this );
241        if ( sizeofExpr->get_isType() ) {
242                maybeAccept( sizeofExpr->get_type(), *this );
243        } else {
244                maybeAccept( sizeofExpr->get_expr(), *this );
245        }
246}
247
248void Visitor::visit( AlignofExpr *alignofExpr ) {
249        maybeAccept( alignofExpr->get_result(), *this );
250        if ( alignofExpr->get_isType() ) {
251                maybeAccept( alignofExpr->get_type(), *this );
252        } else {
253                maybeAccept( alignofExpr->get_expr(), *this );
254        }
255}
256
257void Visitor::visit( UntypedOffsetofExpr *offsetofExpr ) {
258        maybeAccept( offsetofExpr->get_result(), *this );
259        maybeAccept( offsetofExpr->get_type(), *this );
260}
261
262void Visitor::visit( OffsetofExpr *offsetofExpr ) {
263        maybeAccept( offsetofExpr->get_result(), *this );
264        maybeAccept( offsetofExpr->get_type(), *this );
265        maybeAccept( offsetofExpr->get_member(), *this );
266}
267
268void Visitor::visit( OffsetPackExpr *offsetPackExpr ) {
269        maybeAccept( offsetPackExpr->get_result(), *this );
270        maybeAccept( offsetPackExpr->get_type(), *this );
271}
272
273void Visitor::visit( AttrExpr *attrExpr ) {
274        maybeAccept( attrExpr->get_result(), *this );
275        if ( attrExpr->get_isType() ) {
276                maybeAccept( attrExpr->get_type(), *this );
277        } else {
278                maybeAccept( attrExpr->get_expr(), *this );
279        }
280}
281
282void Visitor::visit( LogicalExpr *logicalExpr ) {
283        maybeAccept( logicalExpr->get_result(), *this );
284        maybeAccept( logicalExpr->get_arg1(), *this );
285        maybeAccept( logicalExpr->get_arg2(), *this );
286}
287
288void Visitor::visit( ConditionalExpr *conditionalExpr ) {
289        maybeAccept( conditionalExpr->get_result(), *this );
290        maybeAccept( conditionalExpr->get_arg1(), *this );
291        maybeAccept( conditionalExpr->get_arg2(), *this );
292        maybeAccept( conditionalExpr->get_arg3(), *this );
293}
294
295void Visitor::visit( CommaExpr *commaExpr ) {
296        maybeAccept( commaExpr->get_result(), *this );
297        maybeAccept( commaExpr->get_arg1(), *this );
298        maybeAccept( commaExpr->get_arg2(), *this );
299}
300
301void Visitor::visit( TypeExpr *typeExpr ) {
302        maybeAccept( typeExpr->get_result(), *this );
303        maybeAccept( typeExpr->get_type(), *this );
304}
305
306void Visitor::visit( AsmExpr *asmExpr ) {
307        maybeAccept( asmExpr->get_inout(), *this );
308        maybeAccept( asmExpr->get_constraint(), *this );
309        maybeAccept( asmExpr->get_operand(), *this );
310}
311
312void Visitor::visit( ImplicitCopyCtorExpr *impCpCtorExpr ) {
313        maybeAccept( impCpCtorExpr->get_result(), *this );
314        maybeAccept( impCpCtorExpr->get_callExpr(), *this );
315        acceptAll( impCpCtorExpr->get_tempDecls(), *this );
316        acceptAll( impCpCtorExpr->get_returnDecls(), *this );
317        acceptAll( impCpCtorExpr->get_dtors(), *this );
318}
319
320void Visitor::visit( ConstructorExpr * ctorExpr ) {
321        maybeAccept( ctorExpr->get_result(), *this );
322        maybeAccept( ctorExpr->get_callExpr(), *this );
323}
324
325void Visitor::visit( CompoundLiteralExpr *compLitExpr ) {
326        maybeAccept( compLitExpr->get_result(), *this );
327        maybeAccept( compLitExpr->get_initializer(), *this );
328}
329
330void Visitor::visit( RangeExpr *rangeExpr ) {
331        maybeAccept( rangeExpr->get_low(), *this );
332        maybeAccept( rangeExpr->get_high(), *this );
333}
334
335void Visitor::visit( UntypedTupleExpr *tupleExpr ) {
336        maybeAccept( tupleExpr->get_result(), *this );
337        acceptAll( tupleExpr->get_exprs(), *this );
338}
339
340void Visitor::visit( TupleExpr *tupleExpr ) {
341        maybeAccept( tupleExpr->get_result(), *this );
342        acceptAll( tupleExpr->get_exprs(), *this );
343}
344
345void Visitor::visit( TupleIndexExpr *tupleExpr ) {
346        maybeAccept( tupleExpr->get_result(), *this );
347        maybeAccept( tupleExpr->get_tuple(), *this );
348}
349
350void Visitor::visit( TupleAssignExpr *assignExpr ) {
351        maybeAccept( assignExpr->get_result(), *this );
352        maybeAccept( assignExpr->get_stmtExpr(), *this );
353}
354
355void Visitor::visit( StmtExpr *stmtExpr ) {
356        maybeAccept( stmtExpr->get_result(), *this );
357        maybeAccept( stmtExpr->get_statements(), *this );
358        acceptAll( stmtExpr->get_returnDecls(), *this );
359        acceptAll( stmtExpr->get_dtors(), *this );
360}
361
362void Visitor::visit( UniqueExpr *uniqueExpr ) {
363        maybeAccept( uniqueExpr->get_result(), *this );
364        maybeAccept( uniqueExpr->get_expr(), *this );
365}
366
367void Visitor::visit( UntypedInitExpr * initExpr ) {
368        maybeAccept( initExpr->get_result(), *this );
369        maybeAccept( initExpr->get_expr(), *this );
370        // not currently visiting initAlts, but this doesn't matter since this node is only used in the resolver.
371}
372
373void Visitor::visit( InitExpr * initExpr ) {
374        maybeAccept( initExpr->get_result(), *this );
375        maybeAccept( initExpr->get_expr(), *this );
376        maybeAccept( initExpr->get_designation(), *this );
377}
378
379
380void Visitor::visit( VoidType *voidType ) {
381        acceptAll( voidType->get_forall(), *this );
382}
383
384void Visitor::visit( BasicType *basicType ) {
385        acceptAll( basicType->get_forall(), *this );
386}
387
388void Visitor::visit( PointerType *pointerType ) {
389        acceptAll( pointerType->get_forall(), *this );
390        // xxx - should PointerType visit/mutate dimension?
391        maybeAccept( pointerType->get_base(), *this );
392}
393
394void Visitor::visit( ArrayType *arrayType ) {
395        acceptAll( arrayType->get_forall(), *this );
396        maybeAccept( arrayType->get_dimension(), *this );
397        maybeAccept( arrayType->get_base(), *this );
398}
399
400void Visitor::visit( ReferenceType *refType ) {
401        acceptAll( refType->get_forall(), *this );
402        maybeAccept( refType->get_base(), *this );
403}
404
405void Visitor::visit( FunctionType *functionType ) {
406        acceptAll( functionType->get_forall(), *this );
407        acceptAll( functionType->get_returnVals(), *this );
408        acceptAll( functionType->get_parameters(), *this );
409}
410
411void Visitor::handleReferenceToType( ReferenceToType *aggregateUseType ) {
412        acceptAll( aggregateUseType->get_forall(), *this );
413        acceptAll( aggregateUseType->get_parameters(), *this );
414}
415
416void Visitor::visit( StructInstType *aggregateUseType ) {
417        handleReferenceToType( static_cast< ReferenceToType * >( aggregateUseType ) );
418}
419
420void Visitor::visit( UnionInstType *aggregateUseType ) {
421        handleReferenceToType( static_cast< ReferenceToType * >( aggregateUseType ) );
422}
423
424void Visitor::visit( EnumInstType *aggregateUseType ) {
425        handleReferenceToType( static_cast< ReferenceToType * >( aggregateUseType ) );
426}
427
428void Visitor::visit( TraitInstType *aggregateUseType ) {
429        handleReferenceToType( static_cast< ReferenceToType * >( aggregateUseType ) );
430}
431
432void Visitor::visit( TypeInstType *aggregateUseType ) {
433        handleReferenceToType( static_cast< ReferenceToType * >( aggregateUseType ) );
434}
435
436void Visitor::visit( TupleType *tupleType ) {
437        acceptAll( tupleType->get_forall(), *this );
438        acceptAll( tupleType->get_types(), *this );
439        acceptAll( tupleType->get_members(), *this );
440}
441
442void Visitor::visit( TypeofType *typeofType ) {
443        assert( typeofType->get_expr() );
444        typeofType->get_expr()->accept( *this );
445}
446
447void Visitor::visit( AttrType *attrType ) {
448        if ( attrType->get_isType() ) {
449                assert( attrType->get_type() );
450                attrType->get_type()->accept( *this );
451        } else {
452                assert( attrType->get_expr() );
453                attrType->get_expr()->accept( *this );
454        } // if
455}
456
457void Visitor::visit( VarArgsType *varArgsType ) {
458        acceptAll( varArgsType->get_forall(), *this );
459}
460
461void Visitor::visit( ZeroType *zeroType ) {
462        acceptAll( zeroType->get_forall(), *this );
463}
464
465void Visitor::visit( OneType *oneType ) {
466        acceptAll( oneType->get_forall(), *this );
467}
468
469void Visitor::visit( Designation * designation ) {
470        acceptAll( designation->get_designators(), *this );
471}
472
473void Visitor::visit( SingleInit *singleInit ) {
474        singleInit->get_value()->accept( *this );
475}
476
477void Visitor::visit( ListInit *listInit ) {
478        acceptAll( listInit->get_designations(), *this );
479        acceptAll( listInit->get_initializers(), *this );
480}
481
482void Visitor::visit( ConstructorInit *ctorInit ) {
483        maybeAccept( ctorInit->get_ctor(), *this );
484        maybeAccept( ctorInit->get_dtor(), *this );
485        maybeAccept( ctorInit->get_init(), *this );
486}
487
488
489void Visitor::visit( __attribute__((unused)) Subrange *subrange ) {}
490
491
492void Visitor::visit( __attribute__((unused)) Constant *constant ) {}
493// Local Variables: //
494// tab-width: 4 //
495// mode: c++ //
496// compile-command: "make install" //
497// End: //
Note: See TracBrowser for help on using the repository browser.