source: src/AST/Pass.impl.hpp@ dd92fe9

ADT arm-eh ast-experimental enum forall-pointer-decay jacob/cs343-translation new-ast-unique-expr pthread-emulation qualifiedEnum
Last change on this file since dd92fe9 was 361bf01, checked in by Fangren Yu <f37yu@…>, 5 years ago

remove ParameterizedType and put content into FunctionType

  • Property mode set to 100644
File size: 58.1 KB
RevLine 
[04124c4]1//
2// Cforall Version 1.0.0 Copyright (C) 2019 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//
[e0016a5]7// ast::Pass.impl.hpp --
[04124c4]8//
9// Author : Thierry Delisle
10// Created On : Thu May 09 15::37::05 2019
11// Last Modified By :
12// Last Modified On :
13// Update Count :
14//
15
[f47f887]16#pragma once
[04124c4]17// IWYU pragma: private, include "AST/Pass.hpp"
[f47f887]18
[6d51bd7]19#include <type_traits>
20#include <unordered_map>
21
[293dc1c]22#include "AST/TranslationUnit.hpp"
[c671112]23#include "AST/TypeSubstitution.hpp"
24
[f47f887]25#define VISIT_START( node ) \
[04124c4]26 using namespace ast; \
[f47f887]27 /* back-up the visit children */ \
[7ff3e522]28 __attribute__((unused)) ast::__pass::visit_children_guard guard1( ast::__pass::visit_children(core, 0) ); \
[f47f887]29 /* setup the scope for passes that want to run code at exit */ \
[7ff3e522]30 __attribute__((unused)) ast::__pass::guard_value guard2( ast::__pass::at_cleanup (core, 0) ); \
[c15085d]31 /* begin tracing memory allocation if requested by this pass */ \
[7ff3e522]32 __pass::beginTrace( core, 0 ); \
[f47f887]33 /* call the implementation of the previsit of this pass */ \
[7ff3e522]34 __pass::previsit( core, node, 0 );
[f47f887]35
[6d51bd7]36#define VISIT( code... ) \
[f47f887]37 /* if this node should visit its children */ \
38 if ( __visit_children() ) { \
39 /* visit the children */ \
40 code \
41 }
42
43#define VISIT_END( type, node ) \
44 /* call the implementation of the postvisit of this pass */ \
[7ff3e522]45 auto __return = __pass::postvisit( core, node, 0 ); \
[f47f887]46 assertf(__return, "post visit should never return null"); \
[c15085d]47 /* end tracing memory allocation if requested by this pass */ \
[7ff3e522]48 __pass::endTrace( core, 0 ); \
[f47f887]49 return __return;
50
51#ifdef PEDANTIC_PASS_ASSERT
[6d51bd7]52#define __pedantic_pass_assert(...) assert (__VA_ARGS__)
53#define __pedantic_pass_assertf(...) assertf(__VA_ARGS__)
[f47f887]54#else
[6d51bd7]55#define __pedantic_pass_assert(...)
[f47f887]56#define __pedantic_pass_assertf(...)
57#endif
58
59namespace ast {
[d3aa64f1]60 template<typename node_t>
61 node_t * shallowCopy( const node_t * node );
62
[f47f887]63 namespace __pass {
64 // Check if this is either a null pointer or a pointer to an empty container
65 template<typename T>
66 static inline bool empty( T * ptr ) {
67 return !ptr || ptr->empty();
68 }
69
[d3aa64f1]70 template< typename core_t, typename node_t >
71 static inline node_t* mutate(const node_t *node) {
72 return std::is_base_of<PureVisitor, core_t>::value ? ::ast::shallowCopy(node) : ::ast::mutate(node);
73 }
74
[6d51bd7]75 //------------------------------
76 template<typename it_t, template <class...> class container_t>
77 static inline void take_all( it_t it, container_t<ast::ptr<ast::Decl>> * decls, bool * mutated = nullptr ) {
[f47f887]78 if(empty(decls)) return;
79
[6d51bd7]80 std::transform(decls->begin(), decls->end(), it, [](const ast::Decl * decl) -> auto {
[8a5530c]81 return new DeclStmt( decl->location, decl );
[f47f887]82 });
83 decls->clear();
84 if(mutated) *mutated = true;
85 }
86
[6d51bd7]87 template<typename it_t, template <class...> class container_t>
88 static inline void take_all( it_t it, container_t<ast::ptr<ast::Stmt>> * decls, bool * mutated = nullptr ) {
[f47f887]89 if(empty(decls)) return;
90
91 std::move(decls->begin(), decls->end(), it);
92 decls->clear();
93 if(mutated) *mutated = true;
94 }
95
[6d51bd7]96 //------------------------------
97 /// Check if should be skipped, different for pointers and containers
[f47f887]98 template<typename node_t>
[6d51bd7]99 bool skip( const ast::ptr<node_t> & val) {
100 return !val;
[f47f887]101 }
102
[6d51bd7]103 template< template <class...> class container_t, typename node_t >
104 bool skip( const container_t<ast::ptr< node_t >> & val ) {
105 return val.empty();
[f47f887]106 }
107
[6d51bd7]108 //------------------------------
109 /// Get the value to visit, different for pointers and containers
110 template<typename node_t>
111 auto get( const ast::ptr<node_t> & val, int ) -> decltype(val.get()) {
112 return val.get();
113 }
[f47f887]114
[6d51bd7]115 template<typename node_t>
116 const node_t & get( const node_t & val, long) {
117 return val;
118 }
[f47f887]119
[6d51bd7]120
121 //------------------------------
122 /// Check if value was mutated, different for pointers and containers
123 template<typename lhs_t, typename rhs_t>
124 bool differs( const lhs_t * old_val, const rhs_t * new_val ) {
125 return old_val != new_val;
126 }
127
128 template< template <class...> class container_t, typename node_t >
129 bool differs( const container_t<ast::ptr< node_t >> &, const container_t<ast::ptr< node_t >> & new_val ) {
130 return !new_val.empty();
[f47f887]131 }
132 }
133
[7ff3e522]134 template< typename core_t >
[f47f887]135 template< typename node_t >
[7ff3e522]136 auto ast::Pass< core_t >::call_accept( const node_t * node )
[8a5530c]137 -> typename std::enable_if<
138 !std::is_base_of<ast::Expr, node_t>::value &&
139 !std::is_base_of<ast::Stmt, node_t>::value
140 , decltype( node->accept(*this) )
141 >::type
142 {
[f47f887]143 __pedantic_pass_assert( __visit_children() );
[e0e9a0b]144 __pedantic_pass_assert( node );
[f47f887]145
[6d51bd7]146 static_assert( !std::is_base_of<ast::Expr, node_t>::value, "ERROR");
147 static_assert( !std::is_base_of<ast::Stmt, node_t>::value, "ERROR");
148
[f47f887]149 return node->accept( *this );
150 }
151
[7ff3e522]152 template< typename core_t >
153 const ast::Expr * ast::Pass< core_t >::call_accept( const ast::Expr * expr ) {
[f47f887]154 __pedantic_pass_assert( __visit_children() );
155 __pedantic_pass_assert( expr );
156
[b2a11ba]157 const ast::TypeSubstitution ** typeSubs_ptr = __pass::typeSubs( core, 0 );
158 if ( typeSubs_ptr && expr->env ) {
159 *typeSubs_ptr = expr->env;
[f47f887]160 }
161
162 return expr->accept( *this );
163 }
164
[7ff3e522]165 template< typename core_t >
166 const ast::Stmt * ast::Pass< core_t >::call_accept( const ast::Stmt * stmt ) {
[f47f887]167 __pedantic_pass_assert( __visit_children() );
168 __pedantic_pass_assert( stmt );
169
[490fb92e]170 return stmt->accept( *this );
171 }
172
173 template< typename core_t >
174 const ast::Stmt * ast::Pass< core_t >::call_accept_as_compound( const ast::Stmt * stmt ) {
175 __pedantic_pass_assert( __visit_children() );
176 __pedantic_pass_assert( stmt );
177
[f47f887]178 // add a few useful symbols to the scope
179 using __pass::empty;
180
181 // get the stmts/decls that will need to be spliced in
[7ff3e522]182 auto stmts_before = __pass::stmtsToAddBefore( core, 0);
183 auto stmts_after = __pass::stmtsToAddAfter ( core, 0);
184 auto decls_before = __pass::declsToAddBefore( core, 0);
185 auto decls_after = __pass::declsToAddAfter ( core, 0);
[f47f887]186
187 // These may be modified by subnode but most be restored once we exit this statemnet.
[b2a11ba]188 ValueGuardPtr< const ast::TypeSubstitution * > __old_env ( __pass::typeSubs( core, 0 ) );
[23f99e1]189 ValueGuardPtr< typename std::remove_pointer< decltype(stmts_before) >::type > __old_decls_before( stmts_before );
190 ValueGuardPtr< typename std::remove_pointer< decltype(stmts_after ) >::type > __old_decls_after ( stmts_after );
191 ValueGuardPtr< typename std::remove_pointer< decltype(decls_before) >::type > __old_stmts_before( decls_before );
192 ValueGuardPtr< typename std::remove_pointer< decltype(decls_after ) >::type > __old_stmts_after ( decls_after );
[f47f887]193
194 // Now is the time to actually visit the node
[6d51bd7]195 const ast::Stmt * nstmt = stmt->accept( *this );
[f47f887]196
197 // If the pass doesn't want to add anything then we are done
198 if( empty(stmts_before) && empty(stmts_after) && empty(decls_before) && empty(decls_after) ) {
199 return nstmt;
200 }
201
202 // Make sure that it is either adding statements or declartions but not both
203 // this is because otherwise the order would be awkward to predict
204 assert(( empty( stmts_before ) && empty( stmts_after ))
205 || ( empty( decls_before ) && empty( decls_after )) );
206
207 // Create a new Compound Statement to hold the new decls/stmts
[6d51bd7]208 ast::CompoundStmt * compound = new ast::CompoundStmt( stmt->location );
[f47f887]209
210 // Take all the declarations that go before
211 __pass::take_all( std::back_inserter( compound->kids ), decls_before );
212 __pass::take_all( std::back_inserter( compound->kids ), stmts_before );
213
214 // Insert the original declaration
[6d51bd7]215 compound->kids.emplace_back( nstmt );
[f47f887]216
217 // Insert all the declarations that go before
218 __pass::take_all( std::back_inserter( compound->kids ), decls_after );
219 __pass::take_all( std::back_inserter( compound->kids ), stmts_after );
220
221 return compound;
222 }
223
[7ff3e522]224 template< typename core_t >
[6d51bd7]225 template< template <class...> class container_t >
[7ff3e522]226 container_t< ptr<Stmt> > ast::Pass< core_t >::call_accept( const container_t< ptr<Stmt> > & statements ) {
[f47f887]227 __pedantic_pass_assert( __visit_children() );
228 if( statements.empty() ) return {};
229
230 // We are going to aggregate errors for all these statements
231 SemanticErrorException errors;
232
233 // add a few useful symbols to the scope
234 using __pass::empty;
235
236 // get the stmts/decls that will need to be spliced in
[7ff3e522]237 auto stmts_before = __pass::stmtsToAddBefore( core, 0);
238 auto stmts_after = __pass::stmtsToAddAfter ( core, 0);
239 auto decls_before = __pass::declsToAddBefore( core, 0);
240 auto decls_after = __pass::declsToAddAfter ( core, 0);
[f47f887]241
242 // These may be modified by subnode but most be restored once we exit this statemnet.
[23f99e1]243 ValueGuardPtr< typename std::remove_pointer< decltype(stmts_before) >::type > __old_decls_before( stmts_before );
244 ValueGuardPtr< typename std::remove_pointer< decltype(stmts_after ) >::type > __old_decls_after ( stmts_after );
245 ValueGuardPtr< typename std::remove_pointer< decltype(decls_before) >::type > __old_stmts_before( decls_before );
246 ValueGuardPtr< typename std::remove_pointer< decltype(decls_after ) >::type > __old_stmts_after ( decls_after );
[f47f887]247
248 // update pass statitistics
249 pass_visitor_stats.depth++;
250 pass_visitor_stats.max->push(pass_visitor_stats.depth);
251 pass_visitor_stats.avg->push(pass_visitor_stats.depth);
252
253 bool mutated = false;
[04124c4]254 container_t< ptr<Stmt> > new_kids;
255 for( const Stmt * stmt : statements ) {
[f47f887]256 try {
257 __pedantic_pass_assert( stmt );
[6d51bd7]258 const ast::Stmt * new_stmt = stmt->accept( *this );
[f47f887]259 assert( new_stmt );
260 if(new_stmt != stmt ) mutated = true;
261
262 // Make sure that it is either adding statements or declartions but not both
263 // this is because otherwise the order would be awkward to predict
264 assert(( empty( stmts_before ) && empty( stmts_after ))
265 || ( empty( decls_before ) && empty( decls_after )) );
266
267
268
269 // Take all the statements which should have gone after, N/A for first iteration
270 __pass::take_all( std::back_inserter( new_kids ), decls_before, &mutated );
271 __pass::take_all( std::back_inserter( new_kids ), stmts_before, &mutated );
272
273 // Now add the statement if there is one
274 new_kids.emplace_back( new_stmt );
275
276 // Take all the declarations that go before
277 __pass::take_all( std::back_inserter( new_kids ), decls_after, &mutated );
278 __pass::take_all( std::back_inserter( new_kids ), stmts_after, &mutated );
279 }
280 catch ( SemanticErrorException &e ) {
281 errors.append( e );
282 }
283 }
284 pass_visitor_stats.depth--;
285 if ( !errors.isEmpty() ) { throw errors; }
286
[6d51bd7]287 return mutated ? new_kids : container_t< ptr<Stmt> >();
[f47f887]288 }
289
[7ff3e522]290 template< typename core_t >
[6d51bd7]291 template< template <class...> class container_t, typename node_t >
[7ff3e522]292 container_t< ast::ptr<node_t> > ast::Pass< core_t >::call_accept( const container_t< ast::ptr<node_t> > & container ) {
[f47f887]293 __pedantic_pass_assert( __visit_children() );
294 if( container.empty() ) return {};
295 SemanticErrorException errors;
296
297 pass_visitor_stats.depth++;
298 pass_visitor_stats.max->push(pass_visitor_stats.depth);
299 pass_visitor_stats.avg->push(pass_visitor_stats.depth);
300
301 bool mutated = false;
302 container_t< ast::ptr<node_t> > new_kids;
303 for ( const node_t * node : container ) {
304 try {
305 __pedantic_pass_assert( node );
[6d51bd7]306 const node_t * new_stmt = strict_dynamic_cast< const node_t * >( node->accept( *this ) );
307 if(new_stmt != node ) mutated = true;
[f47f887]308
309 new_kids.emplace_back( new_stmt );
310 }
311 catch( SemanticErrorException &e ) {
312 errors.append( e );
313 }
314 }
315 pass_visitor_stats.depth--;
316 if ( ! errors.isEmpty() ) { throw errors; }
317
[6d51bd7]318 return mutated ? new_kids : container_t< ast::ptr<node_t> >();
319 }
320
[7ff3e522]321 template< typename core_t >
[6d51bd7]322 template<typename node_t, typename parent_t, typename child_t>
[7ff3e522]323 void ast::Pass< core_t >::maybe_accept(
[6d51bd7]324 const node_t * & parent,
325 child_t parent_t::*child
326 ) {
[8a5530c]327 static_assert( std::is_base_of<parent_t, node_t>::value, "Error deducing member object" );
[6d51bd7]328
329 if(__pass::skip(parent->*child)) return;
330 const auto & old_val = __pass::get(parent->*child, 0);
331
332 static_assert( !std::is_same<const ast::Node * &, decltype(old_val)>::value, "ERROR");
333
334 auto new_val = call_accept( old_val );
335
336 static_assert( !std::is_same<const ast::Node *, decltype(new_val)>::value || std::is_same<int, decltype(old_val)>::value, "ERROR");
337
338 if( __pass::differs(old_val, new_val) ) {
[d3aa64f1]339 auto new_parent = __pass::mutate<core_t>(parent);
[6d51bd7]340 new_parent->*child = new_val;
341 parent = new_parent;
342 }
[f47f887]343 }
[6d51bd7]344
[490fb92e]345 template< typename core_t >
346 template<typename node_t, typename parent_t, typename child_t>
347 void ast::Pass< core_t >::maybe_accept_as_compound(
348 const node_t * & parent,
349 child_t parent_t::*child
350 ) {
351 static_assert( std::is_base_of<parent_t, node_t>::value, "Error deducing member object" );
352
353 if(__pass::skip(parent->*child)) return;
354 const auto & old_val = __pass::get(parent->*child, 0);
355
356 static_assert( !std::is_same<const ast::Node * &, decltype(old_val)>::value, "ERROR");
357
358 auto new_val = call_accept_as_compound( old_val );
359
360 static_assert( !std::is_same<const ast::Node *, decltype(new_val)>::value || std::is_same<int, decltype(old_val)>::value, "ERROR");
361
362 if( __pass::differs(old_val, new_val) ) {
363 auto new_parent = __pass::mutate<core_t>(parent);
364 new_parent->*child = new_val;
365 parent = new_parent;
366 }
367 }
368
[e0e9a0b]369
[7ff3e522]370 template< typename core_t >
[e0e9a0b]371 template< typename node_t >
[7ff3e522]372 void ast::Pass< core_t >::mutate_forall( const node_t *& node ) {
373 if ( auto subs = __pass::forall::subs( core, 0 ) ) {
[e0e9a0b]374 // tracking TypeDecl substitution, full clone
375 if ( node->forall.empty() ) return;
376
[d3aa64f1]377 node_t * mut = __pass::mutate<core_t>( node );
[e0e9a0b]378 mut->forall = subs->clone( node->forall, *this );
379 node = mut;
380 } else {
381 // not tracking TypeDecl substitution, just mutate
382 maybe_accept( node, &node_t::forall );
383 }
384 }
[f47f887]385}
386
387//------------------------------------------------------------------------------------------------------------------------------------------------------------------------
388//========================================================================================================================================================================
389//========================================================================================================================================================================
390//========================================================================================================================================================================
391//========================================================================================================================================================================
392//========================================================================================================================================================================
393//------------------------------------------------------------------------------------------------------------------------------------------------------------------------
394
[7ff3e522]395template< typename core_t >
396inline void ast::accept_all( std::list< ast::ptr<ast::Decl> > & decls, ast::Pass< core_t > & visitor ) {
[04124c4]397 // We are going to aggregate errors for all these statements
398 SemanticErrorException errors;
399
400 // add a few useful symbols to the scope
401 using __pass::empty;
402
403 // get the stmts/decls that will need to be spliced in
[7ff3e522]404 auto decls_before = __pass::declsToAddBefore( visitor.core, 0);
405 auto decls_after = __pass::declsToAddAfter ( visitor.core, 0);
[04124c4]406
407 // update pass statitistics
408 pass_visitor_stats.depth++;
409 pass_visitor_stats.max->push(pass_visitor_stats.depth);
410 pass_visitor_stats.avg->push(pass_visitor_stats.depth);
411
412 for ( std::list< ast::ptr<ast::Decl> >::iterator i = decls.begin(); ; ++i ) {
413 // splice in new declarations after previous decl
414 if ( !empty( decls_after ) ) { decls.splice( i, *decls_after ); }
415
416 if ( i == decls.end() ) break;
417
418 try {
419 // run visitor on declaration
420 ast::ptr<ast::Decl> & node = *i;
421 assert( node );
422 node = node->accept( visitor );
423 }
424 catch( SemanticErrorException &e ) {
[e00c22f]425 if (__pass::on_error (visitor.core, *i, 0))
[0dd9a5e]426 errors.append( e );
[04124c4]427 }
428
429 // splice in new declarations before current decl
430 if ( !empty( decls_before ) ) { decls.splice( i, *decls_before ); }
431 }
432 pass_visitor_stats.depth--;
433 if ( !errors.isEmpty() ) { throw errors; }
434}
435
[293dc1c]436template< typename core_t >
437inline void ast::accept_all( ast::TranslationUnit & unit, ast::Pass< core_t > & visitor ) {
438 return ast::accept_all( unit.decls, visitor );
439}
440
[f47f887]441// A NOTE ON THE ORDER OF TRAVERSAL
442//
443// Types and typedefs have their base types visited before they are added to the type table. This is ok, since there is
444// no such thing as a recursive type or typedef.
445//
446// typedef struct { T *x; } T; // never allowed
447//
448// for structs/unions, it is possible to have recursion, so the decl should be added as if it's incomplete to begin, the
449// members are traversed, and then the complete type should be added (assuming the type is completed by this particular
450// declaration).
451//
452// struct T { struct T *x; }; // allowed
453//
454// It is important to add the complete type to the symbol table *after* the members/base has been traversed, since that
455// traversal may modify the definition of the type and these modifications should be visible when the symbol table is
456// queried later in this pass.
457
458//--------------------------------------------------------------------------
459// ObjectDecl
[7ff3e522]460template< typename core_t >
461const ast::DeclWithType * ast::Pass< core_t >::visit( const ast::ObjectDecl * node ) {
[f47f887]462 VISIT_START( node );
463
464 VISIT(
465 {
[0e42794]466 guard_symtab guard { *this };
[23f99e1]467 maybe_accept( node, &ObjectDecl::type );
[f47f887]468 }
[23f99e1]469 maybe_accept( node, &ObjectDecl::init );
470 maybe_accept( node, &ObjectDecl::bitfieldWidth );
471 maybe_accept( node, &ObjectDecl::attributes );
[f47f887]472 )
473
[7ff3e522]474 __pass::symtab::addId( core, 0, node );
[f47f887]475
[04124c4]476 VISIT_END( DeclWithType, node );
[f47f887]477}
478
[23f99e1]479//--------------------------------------------------------------------------
480// FunctionDecl
[7ff3e522]481template< typename core_t >
482const ast::DeclWithType * ast::Pass< core_t >::visit( const ast::FunctionDecl * node ) {
[23f99e1]483 VISIT_START( node );
484
[7ff3e522]485 __pass::symtab::addId( core, 0, node );
[23f99e1]486
487 VISIT(maybe_accept( node, &FunctionDecl::withExprs );)
488 {
489 // with clause introduces a level of scope (for the with expression members).
[0e42794]490 // with clause exprs are added to the symbol table before parameters so that parameters
[23f99e1]491 // shadow with exprs and not the other way around.
[0e42794]492 guard_symtab guard { *this };
[7ff3e522]493 __pass::symtab::addWith( core, 0, node->withExprs, node );
[23f99e1]494 {
[0e42794]495 guard_symtab guard { *this };
[23f99e1]496 // implicit add __func__ identifier as specified in the C manual 6.4.2.2
[9ea38de]497 static ast::ptr< ast::ObjectDecl > func{ new ast::ObjectDecl{
498 CodeLocation{}, "__func__",
499 new ast::ArrayType{
500 new ast::BasicType{ ast::BasicType::Char, ast::CV::Const },
[8a5530c]501 nullptr, VariableLen, DynamicDim
[9ea38de]502 }
503 } };
[7ff3e522]504 __pass::symtab::addId( core, 0, func );
[23f99e1]505 VISIT(
[954c954]506 // parameter declarations are now directly here
507 maybe_accept( node, &FunctionDecl::params );
508 maybe_accept( node, &FunctionDecl::returns );
509 // foralls are still in function type
[23f99e1]510 maybe_accept( node, &FunctionDecl::type );
[c6c682cf]511 // First remember that we are now within a function.
[23f99e1]512 ValueGuard< bool > oldInFunction( inFunction );
513 inFunction = true;
[c6c682cf]514 // The function body needs to have the same scope as parameters.
515 // A CompoundStmt will not enter a new scope if atFunctionTop is true.
516 ValueGuard< bool > oldAtFunctionTop( atFunctionTop );
517 atFunctionTop = true;
[8a5530c]518 maybe_accept( node, &FunctionDecl::stmts );
[23f99e1]519 maybe_accept( node, &FunctionDecl::attributes );
520 )
521 }
522 }
523
524 VISIT_END( DeclWithType, node );
525}
526
527//--------------------------------------------------------------------------
528// StructDecl
[7ff3e522]529template< typename core_t >
530const ast::Decl * ast::Pass< core_t >::visit( const ast::StructDecl * node ) {
[23f99e1]531 VISIT_START( node );
532
533 // make up a forward declaration and add it before processing the members
534 // needs to be on the heap because addStruct saves the pointer
[7ff3e522]535 __pass::symtab::addStructFwd( core, 0, node );
[23f99e1]536
537 VISIT({
[0e42794]538 guard_symtab guard { * this };
[87701b6]539 maybe_accept( node, &StructDecl::params );
540 maybe_accept( node, &StructDecl::members );
[23f99e1]541 })
542
543 // this addition replaces the forward declaration
[7ff3e522]544 __pass::symtab::addStruct( core, 0, node );
[23f99e1]545
546 VISIT_END( Decl, node );
547}
548
549//--------------------------------------------------------------------------
550// UnionDecl
[7ff3e522]551template< typename core_t >
552const ast::Decl * ast::Pass< core_t >::visit( const ast::UnionDecl * node ) {
[23f99e1]553 VISIT_START( node );
554
555 // make up a forward declaration and add it before processing the members
[7ff3e522]556 __pass::symtab::addUnionFwd( core, 0, node );
[23f99e1]557
558 VISIT({
[0e42794]559 guard_symtab guard { * this };
[87701b6]560 maybe_accept( node, &UnionDecl::params );
561 maybe_accept( node, &UnionDecl::members );
[23f99e1]562 })
563
[7ff3e522]564 __pass::symtab::addUnion( core, 0, node );
[23f99e1]565
566 VISIT_END( Decl, node );
567}
568
569//--------------------------------------------------------------------------
570// EnumDecl
[7ff3e522]571template< typename core_t >
572const ast::Decl * ast::Pass< core_t >::visit( const ast::EnumDecl * node ) {
[23f99e1]573 VISIT_START( node );
574
[7ff3e522]575 __pass::symtab::addEnum( core, 0, node );
[23f99e1]576
577 VISIT(
578 // unlike structs, traits, and unions, enums inject their members into the global scope
[87701b6]579 maybe_accept( node, &EnumDecl::params );
580 maybe_accept( node, &EnumDecl::members );
[23f99e1]581 )
582
583 VISIT_END( Decl, node );
584}
585
586//--------------------------------------------------------------------------
587// TraitDecl
[7ff3e522]588template< typename core_t >
589const ast::Decl * ast::Pass< core_t >::visit( const ast::TraitDecl * node ) {
[23f99e1]590 VISIT_START( node );
591
592 VISIT({
[0e42794]593 guard_symtab guard { *this };
[87701b6]594 maybe_accept( node, &TraitDecl::params );
595 maybe_accept( node, &TraitDecl::members );
[23f99e1]596 })
597
[7ff3e522]598 __pass::symtab::addTrait( core, 0, node );
[23f99e1]599
600 VISIT_END( Decl, node );
601}
602
603//--------------------------------------------------------------------------
604// TypeDecl
[7ff3e522]605template< typename core_t >
606const ast::Decl * ast::Pass< core_t >::visit( const ast::TypeDecl * node ) {
[23f99e1]607 VISIT_START( node );
608
609 VISIT({
[0e42794]610 guard_symtab guard { *this };
[87701b6]611 maybe_accept( node, &TypeDecl::base );
[23f99e1]612 })
613
614 // see A NOTE ON THE ORDER OF TRAVERSAL, above
615 // note that assertions come after the type is added to the symtab, since they are not part of the type proper
616 // and may depend on the type itself
[7ff3e522]617 __pass::symtab::addType( core, 0, node );
[23f99e1]618
619 VISIT(
[8a5530c]620 maybe_accept( node, &TypeDecl::assertions );
[23f99e1]621
622 {
[0e42794]623 guard_symtab guard { *this };
[23f99e1]624 maybe_accept( node, &TypeDecl::init );
625 }
626 )
627
628 VISIT_END( Decl, node );
629}
630
631//--------------------------------------------------------------------------
632// TypedefDecl
[7ff3e522]633template< typename core_t >
634const ast::Decl * ast::Pass< core_t >::visit( const ast::TypedefDecl * node ) {
[23f99e1]635 VISIT_START( node );
636
637 VISIT({
[0e42794]638 guard_symtab guard { *this };
[87701b6]639 maybe_accept( node, &TypedefDecl::base );
[23f99e1]640 })
641
[7ff3e522]642 __pass::symtab::addType( core, 0, node );
[23f99e1]643
[17a0228a]644 VISIT( maybe_accept( node, &TypedefDecl::assertions ); )
[23f99e1]645
646 VISIT_END( Decl, node );
647}
648
649//--------------------------------------------------------------------------
650// AsmDecl
[7ff3e522]651template< typename core_t >
652const ast::AsmDecl * ast::Pass< core_t >::visit( const ast::AsmDecl * node ) {
[23f99e1]653 VISIT_START( node );
654
655 VISIT(
656 maybe_accept( node, &AsmDecl::stmt );
657 )
658
659 VISIT_END( AsmDecl, node );
660}
661
662//--------------------------------------------------------------------------
663// StaticAssertDecl
[7ff3e522]664template< typename core_t >
665const ast::StaticAssertDecl * ast::Pass< core_t >::visit( const ast::StaticAssertDecl * node ) {
[23f99e1]666 VISIT_START( node );
667
668 VISIT(
[112fe04]669 maybe_accept( node, &StaticAssertDecl::cond );
670 maybe_accept( node, &StaticAssertDecl::msg );
[23f99e1]671 )
672
673 VISIT_END( StaticAssertDecl, node );
674}
675
676//--------------------------------------------------------------------------
677// CompoundStmt
[7ff3e522]678template< typename core_t >
679const ast::CompoundStmt * ast::Pass< core_t >::visit( const ast::CompoundStmt * node ) {
[23f99e1]680 VISIT_START( node );
[82f791f]681 VISIT(
[c6c682cf]682 // Do not enter (or leave) a new scope if atFunctionTop. Remember to save the result.
683 auto guard1 = makeFuncGuard( [this, enterScope = !this->atFunctionTop]() {
[16ba4a6f]684 if ( enterScope ) {
685 __pass::symtab::enter(core, 0);
686 __pass::scope::enter(core, 0);
687 }
[c6c682cf]688 }, [this, leaveScope = !this->atFunctionTop]() {
[16ba4a6f]689 if ( leaveScope ) {
690 __pass::symtab::leave(core, 0);
691 __pass::scope::leave(core, 0);
692 }
[23f99e1]693 });
[82f791f]694 ValueGuard< bool > guard2( atFunctionTop );
695 atFunctionTop = false;
[23f99e1]696 guard_scope guard3 { *this };
697 maybe_accept( node, &CompoundStmt::kids );
[82f791f]698 )
[23f99e1]699 VISIT_END( CompoundStmt, node );
700}
701
[8a5530c]702//--------------------------------------------------------------------------
703// ExprStmt
[7ff3e522]704template< typename core_t >
705const ast::Stmt * ast::Pass< core_t >::visit( const ast::ExprStmt * node ) {
[8a5530c]706 VISIT_START( node );
707
708 VISIT(
709 maybe_accept( node, &ExprStmt::expr );
710 )
711
712 VISIT_END( Stmt, node );
713}
714
715//--------------------------------------------------------------------------
716// AsmStmt
[7ff3e522]717template< typename core_t >
718const ast::Stmt * ast::Pass< core_t >::visit( const ast::AsmStmt * node ) {
[8a5530c]719 VISIT_START( node )
720
721 VISIT(
722 maybe_accept( node, &AsmStmt::instruction );
723 maybe_accept( node, &AsmStmt::output );
724 maybe_accept( node, &AsmStmt::input );
725 maybe_accept( node, &AsmStmt::clobber );
726 )
727
728 VISIT_END( Stmt, node );
729}
730
731//--------------------------------------------------------------------------
732// DirectiveStmt
[7ff3e522]733template< typename core_t >
734const ast::Stmt * ast::Pass< core_t >::visit( const ast::DirectiveStmt * node ) {
[8a5530c]735 VISIT_START( node )
736
737 VISIT_END( Stmt, node );
738}
739
740//--------------------------------------------------------------------------
741// IfStmt
[7ff3e522]742template< typename core_t >
743const ast::Stmt * ast::Pass< core_t >::visit( const ast::IfStmt * node ) {
[8a5530c]744 VISIT_START( node );
[17a0228a]745
[8a5530c]746 VISIT({
747 // if statements introduce a level of scope (for the initialization)
[0e42794]748 guard_symtab guard { *this };
[8a5530c]749 maybe_accept( node, &IfStmt::inits );
750 maybe_accept( node, &IfStmt::cond );
[490fb92e]751 maybe_accept_as_compound( node, &IfStmt::thenPart );
752 maybe_accept_as_compound( node, &IfStmt::elsePart );
[8a5530c]753 })
[17a0228a]754
[8a5530c]755 VISIT_END( Stmt, node );
756}
757
758//--------------------------------------------------------------------------
759// WhileStmt
[7ff3e522]760template< typename core_t >
761const ast::Stmt * ast::Pass< core_t >::visit( const ast::WhileStmt * node ) {
[8a5530c]762 VISIT_START( node );
763
764 VISIT({
765 // while statements introduce a level of scope (for the initialization)
[0e42794]766 guard_symtab guard { *this };
[8a5530c]767 maybe_accept( node, &WhileStmt::inits );
768 maybe_accept( node, &WhileStmt::cond );
[490fb92e]769 maybe_accept_as_compound( node, &WhileStmt::body );
[8a5530c]770 })
771
772 VISIT_END( Stmt, node );
773}
[23f99e1]774
[87701b6]775//--------------------------------------------------------------------------
776// ForStmt
[7ff3e522]777template< typename core_t >
778const ast::Stmt * ast::Pass< core_t >::visit( const ast::ForStmt * node ) {
[87701b6]779 VISIT_START( node );
780
781 VISIT({
782 // for statements introduce a level of scope (for the initialization)
[0e42794]783 guard_symtab guard { *this };
[490fb92e]784 // xxx - old ast does not create WithStmtsToAdd scope for loop inits. should revisit this later.
[87701b6]785 maybe_accept( node, &ForStmt::inits );
786 maybe_accept( node, &ForStmt::cond );
787 maybe_accept( node, &ForStmt::inc );
[490fb92e]788 maybe_accept_as_compound( node, &ForStmt::body );
[87701b6]789 })
790
791 VISIT_END( Stmt, node );
792}
793
794//--------------------------------------------------------------------------
795// SwitchStmt
[7ff3e522]796template< typename core_t >
797const ast::Stmt * ast::Pass< core_t >::visit( const ast::SwitchStmt * node ) {
[87701b6]798 VISIT_START( node );
799
800 VISIT(
801 maybe_accept( node, &SwitchStmt::cond );
802 maybe_accept( node, &SwitchStmt::stmts );
803 )
804
805 VISIT_END( Stmt, node );
806}
807
808//--------------------------------------------------------------------------
809// CaseStmt
[7ff3e522]810template< typename core_t >
811const ast::Stmt * ast::Pass< core_t >::visit( const ast::CaseStmt * node ) {
[87701b6]812 VISIT_START( node );
813
814 VISIT(
815 maybe_accept( node, &CaseStmt::cond );
816 maybe_accept( node, &CaseStmt::stmts );
817 )
818
819 VISIT_END( Stmt, node );
820}
821
822//--------------------------------------------------------------------------
823// BranchStmt
[7ff3e522]824template< typename core_t >
825const ast::Stmt * ast::Pass< core_t >::visit( const ast::BranchStmt * node ) {
[87701b6]826 VISIT_START( node );
827 VISIT_END( Stmt, node );
828}
829
830//--------------------------------------------------------------------------
831// ReturnStmt
[7ff3e522]832template< typename core_t >
833const ast::Stmt * ast::Pass< core_t >::visit( const ast::ReturnStmt * node ) {
[87701b6]834 VISIT_START( node );
835
[e61207e7]836 VISIT(
837 maybe_accept( node, &ReturnStmt::expr );
838 )
[87701b6]839
840 VISIT_END( Stmt, node );
841}
842
843//--------------------------------------------------------------------------
844// ThrowStmt
[7ff3e522]845template< typename core_t >
846const ast::Stmt * ast::Pass< core_t >::visit( const ast::ThrowStmt * node ) {
[e61207e7]847 VISIT_START( node );
[87701b6]848
[e61207e7]849 VISIT(
850 maybe_accept( node, &ThrowStmt::expr );
851 maybe_accept( node, &ThrowStmt::target );
852 )
853
854 VISIT_END( Stmt, node );
855}
856
857//--------------------------------------------------------------------------
858// TryStmt
[7ff3e522]859template< typename core_t >
860const ast::Stmt * ast::Pass< core_t >::visit( const ast::TryStmt * node ) {
[87701b6]861 VISIT_START( node );
862
[e61207e7]863 VISIT(
[acd80b4]864 maybe_accept( node, &TryStmt::body );
865 maybe_accept( node, &TryStmt::handlers );
866 maybe_accept( node, &TryStmt::finally );
[e61207e7]867 )
[87701b6]868
[e61207e7]869 VISIT_END( Stmt, node );
[87701b6]870}
871
[10a1225]872//--------------------------------------------------------------------------
873// CatchStmt
[7ff3e522]874template< typename core_t >
875const ast::Stmt * ast::Pass< core_t >::visit( const ast::CatchStmt * node ) {
[10a1225]876 VISIT_START( node );
877
878 VISIT({
879 // catch statements introduce a level of scope (for the caught exception)
[0e42794]880 guard_symtab guard { *this };
[10a1225]881 maybe_accept( node, &CatchStmt::decl );
882 maybe_accept( node, &CatchStmt::cond );
[490fb92e]883 maybe_accept_as_compound( node, &CatchStmt::body );
[10a1225]884 })
885
886 VISIT_END( Stmt, node );
887}
888
889//--------------------------------------------------------------------------
890// FinallyStmt
[7ff3e522]891template< typename core_t >
892const ast::Stmt * ast::Pass< core_t >::visit( const ast::FinallyStmt * node ) {
[10a1225]893 VISIT_START( node );
894
895 VISIT(
896 maybe_accept( node, &FinallyStmt::body );
897 )
898
899 VISIT_END( Stmt, node );
900}
901
[37cdd97]902//--------------------------------------------------------------------------
903// FinallyStmt
[7ff3e522]904template< typename core_t >
905const ast::Stmt * ast::Pass< core_t >::visit( const ast::SuspendStmt * node ) {
[37cdd97]906 VISIT_START( node );
907
908 VISIT(
909 maybe_accept( node, &SuspendStmt::then );
910 )
911
912 VISIT_END( Stmt, node );
913}
914
[10a1225]915//--------------------------------------------------------------------------
916// WaitForStmt
[7ff3e522]917template< typename core_t >
918const ast::Stmt * ast::Pass< core_t >::visit( const ast::WaitForStmt * node ) {
[10a1225]919 VISIT_START( node );
920 // for( auto & clause : node->clauses ) {
921 // maybeAccept_impl( clause.target.function, *this );
922 // maybeAccept_impl( clause.target.arguments, *this );
923
924 // maybeAccept_impl( clause.statement, *this );
925 // maybeAccept_impl( clause.condition, *this );
926 // }
927
[e0016a5]928 VISIT({
929 std::vector<WaitForStmt::Clause> new_clauses;
930 new_clauses.reserve( node->clauses.size() );
931 bool mutated = false;
932 for( const auto & clause : node->clauses ) {
933
[b0abc8a0]934 const Expr * func = clause.target.func ? clause.target.func->accept(*this) : nullptr;
[e0016a5]935 if(func != clause.target.func) mutated = true;
936
937 std::vector<ptr<Expr>> new_args;
938 new_args.reserve(clause.target.args.size());
939 for( const auto & arg : clause.target.args ) {
940 auto a = arg->accept(*this);
941 new_args.push_back( a );
942 if( a != arg ) mutated = true;
943 }
944
[b0abc8a0]945 const Stmt * stmt = clause.stmt ? clause.stmt->accept(*this) : nullptr;
[e0016a5]946 if(stmt != clause.stmt) mutated = true;
947
[b0abc8a0]948 const Expr * cond = clause.cond ? clause.cond->accept(*this) : nullptr;
[e0016a5]949 if(cond != clause.cond) mutated = true;
950
951 new_clauses.push_back( WaitForStmt::Clause{ {func, std::move(new_args) }, stmt, cond } );
952 }
953
954 if(mutated) {
[d3aa64f1]955 auto n = __pass::mutate<core_t>(node);
[e0016a5]956 n->clauses = std::move( new_clauses );
957 node = n;
958 }
959 })
960
[10a1225]961 #define maybe_accept(field) \
962 if(node->field) { \
963 auto nval = call_accept( node->field ); \
964 if(nval != node->field ) { \
[d3aa64f1]965 auto nparent = __pass::mutate<core_t>(node); \
[10a1225]966 nparent->field = nval; \
967 node = nparent; \
968 } \
969 }
970
971 VISIT(
972 maybe_accept( timeout.time );
973 maybe_accept( timeout.stmt );
974 maybe_accept( timeout.cond );
975 maybe_accept( orElse.stmt );
976 maybe_accept( orElse.cond );
977 )
978
979 #undef maybe_accept
980
981 VISIT_END( Stmt, node );
982}
983
984//--------------------------------------------------------------------------
985// WithStmt
[7ff3e522]986template< typename core_t >
987const ast::Decl * ast::Pass< core_t >::visit( const ast::WithStmt * node ) {
[10a1225]988 VISIT_START( node );
989
990 VISIT(
991 maybe_accept( node, &WithStmt::exprs );
992 {
993 // catch statements introduce a level of scope (for the caught exception)
[0e42794]994 guard_symtab guard { *this };
[7ff3e522]995 __pass::symtab::addWith( core, 0, node->exprs, node );
[10a1225]996 maybe_accept( node, &WithStmt::stmt );
997 }
998 )
999 VISIT_END( Stmt, node );
1000}
1001
1002//--------------------------------------------------------------------------
1003// NullStmt
[7ff3e522]1004template< typename core_t >
1005const ast::NullStmt * ast::Pass< core_t >::visit( const ast::NullStmt * node ) {
[10a1225]1006 VISIT_START( node );
1007 VISIT_END( NullStmt, node );
1008}
1009
1010//--------------------------------------------------------------------------
1011// DeclStmt
[7ff3e522]1012template< typename core_t >
1013const ast::Stmt * ast::Pass< core_t >::visit( const ast::DeclStmt * node ) {
[10a1225]1014 VISIT_START( node );
1015
1016 VISIT(
1017 maybe_accept( node, &DeclStmt::decl );
1018 )
1019
1020 VISIT_END( Stmt, node );
1021}
1022
1023//--------------------------------------------------------------------------
1024// ImplicitCtorDtorStmt
[7ff3e522]1025template< typename core_t >
1026const ast::Stmt * ast::Pass< core_t >::visit( const ast::ImplicitCtorDtorStmt * node ) {
[10a1225]1027 VISIT_START( node );
1028
1029 // For now this isn't visited, it is unclear if this causes problem
1030 // if all tests are known to pass, remove this code
[c570806]1031 VISIT(
1032 maybe_accept( node, &ImplicitCtorDtorStmt::callStmt );
1033 )
[10a1225]1034
1035 VISIT_END( Stmt, node );
1036}
1037
[17a0228a]1038//--------------------------------------------------------------------------
1039// ApplicationExpr
[7ff3e522]1040template< typename core_t >
1041const ast::Expr * ast::Pass< core_t >::visit( const ast::ApplicationExpr * node ) {
[17a0228a]1042 VISIT_START( node );
1043
1044 VISIT(
1045 {
[0e42794]1046 guard_symtab guard { *this };
[17a0228a]1047 maybe_accept( node, &ApplicationExpr::result );
1048 }
1049 maybe_accept( node, &ApplicationExpr::func );
1050 maybe_accept( node, &ApplicationExpr::args );
1051 )
1052
1053 VISIT_END( Expr, node );
1054}
1055
1056//--------------------------------------------------------------------------
1057// UntypedExpr
[7ff3e522]1058template< typename core_t >
1059const ast::Expr * ast::Pass< core_t >::visit( const ast::UntypedExpr * node ) {
[17a0228a]1060 VISIT_START( node );
1061
1062 VISIT(
1063 {
[0e42794]1064 guard_symtab guard { *this };
[17a0228a]1065 maybe_accept( node, &UntypedExpr::result );
1066 }
1067
1068 maybe_accept( node, &UntypedExpr::args );
1069 )
1070
1071 VISIT_END( Expr, node );
1072}
1073
1074//--------------------------------------------------------------------------
1075// NameExpr
[7ff3e522]1076template< typename core_t >
1077const ast::Expr * ast::Pass< core_t >::visit( const ast::NameExpr * node ) {
[17a0228a]1078 VISIT_START( node );
1079
1080 VISIT({
[0e42794]1081 guard_symtab guard { *this };
[17a0228a]1082 maybe_accept( node, &NameExpr::result );
1083 })
1084
1085 VISIT_END( Expr, node );
1086}
1087
1088//--------------------------------------------------------------------------
1089// CastExpr
[7ff3e522]1090template< typename core_t >
1091const ast::Expr * ast::Pass< core_t >::visit( const ast::CastExpr * node ) {
[17a0228a]1092 VISIT_START( node );
1093
1094 VISIT({
[0e42794]1095 guard_symtab guard { *this };
[17a0228a]1096 maybe_accept( node, &CastExpr::result );
1097 }
1098 maybe_accept( node, &CastExpr::arg );
1099 )
1100
1101 VISIT_END( Expr, node );
1102}
1103
1104//--------------------------------------------------------------------------
1105// KeywordCastExpr
[7ff3e522]1106template< typename core_t >
1107const ast::Expr * ast::Pass< core_t >::visit( const ast::KeywordCastExpr * node ) {
[17a0228a]1108 VISIT_START( node );
1109
1110 VISIT({
[0e42794]1111 guard_symtab guard { *this };
[17a0228a]1112 maybe_accept( node, &KeywordCastExpr::result );
1113 }
1114 maybe_accept( node, &KeywordCastExpr::arg );
1115 )
1116
1117 VISIT_END( Expr, node );
1118}
1119
1120//--------------------------------------------------------------------------
1121// VirtualCastExpr
[7ff3e522]1122template< typename core_t >
1123const ast::Expr * ast::Pass< core_t >::visit( const ast::VirtualCastExpr * node ) {
[17a0228a]1124 VISIT_START( node );
1125
1126 VISIT({
[0e42794]1127 guard_symtab guard { *this };
[17a0228a]1128 maybe_accept( node, &VirtualCastExpr::result );
1129 }
1130 maybe_accept( node, &VirtualCastExpr::arg );
1131 )
1132
1133 VISIT_END( Expr, node );
1134}
1135
1136//--------------------------------------------------------------------------
1137// AddressExpr
[7ff3e522]1138template< typename core_t >
1139const ast::Expr * ast::Pass< core_t >::visit( const ast::AddressExpr * node ) {
[17a0228a]1140 VISIT_START( node );
1141
1142 VISIT({
[0e42794]1143 guard_symtab guard { *this };
[17a0228a]1144 maybe_accept( node, &AddressExpr::result );
1145 }
1146 maybe_accept( node, &AddressExpr::arg );
1147 )
1148
1149 VISIT_END( Expr, node );
1150}
1151
1152//--------------------------------------------------------------------------
1153// LabelAddressExpr
[7ff3e522]1154template< typename core_t >
1155const ast::Expr * ast::Pass< core_t >::visit( const ast::LabelAddressExpr * node ) {
[17a0228a]1156 VISIT_START( node );
1157
1158 VISIT({
[0e42794]1159 guard_symtab guard { *this };
[17a0228a]1160 maybe_accept( node, &LabelAddressExpr::result );
1161 })
1162
1163 VISIT_END( Expr, node );
1164}
1165
1166//--------------------------------------------------------------------------
1167// UntypedMemberExpr
[7ff3e522]1168template< typename core_t >
1169const ast::Expr * ast::Pass< core_t >::visit( const ast::UntypedMemberExpr * node ) {
[17a0228a]1170 VISIT_START( node );
1171
1172 VISIT({
[0e42794]1173 guard_symtab guard { *this };
[17a0228a]1174 maybe_accept( node, &UntypedMemberExpr::result );
1175 }
1176 maybe_accept( node, &UntypedMemberExpr::aggregate );
1177 maybe_accept( node, &UntypedMemberExpr::member );
1178 )
1179
1180 VISIT_END( Expr, node );
1181}
1182
1183//--------------------------------------------------------------------------
1184// MemberExpr
[7ff3e522]1185template< typename core_t >
1186const ast::Expr * ast::Pass< core_t >::visit( const ast::MemberExpr * node ) {
[17a0228a]1187 VISIT_START( node );
1188
1189 VISIT({
[0e42794]1190 guard_symtab guard { *this };
[17a0228a]1191 maybe_accept( node, &MemberExpr::result );
1192 }
1193 maybe_accept( node, &MemberExpr::aggregate );
1194 )
1195
1196 VISIT_END( Expr, node );
1197}
1198
1199//--------------------------------------------------------------------------
1200// VariableExpr
[7ff3e522]1201template< typename core_t >
1202const ast::Expr * ast::Pass< core_t >::visit( const ast::VariableExpr * node ) {
[17a0228a]1203 VISIT_START( node );
1204
1205 VISIT({
[0e42794]1206 guard_symtab guard { *this };
[17a0228a]1207 maybe_accept( node, &VariableExpr::result );
1208 })
1209
1210 VISIT_END( Expr, node );
1211}
1212
1213//--------------------------------------------------------------------------
1214// ConstantExpr
[7ff3e522]1215template< typename core_t >
1216const ast::Expr * ast::Pass< core_t >::visit( const ast::ConstantExpr * node ) {
[17a0228a]1217 VISIT_START( node );
1218
1219 VISIT({
[0e42794]1220 guard_symtab guard { *this };
[17a0228a]1221 maybe_accept( node, &ConstantExpr::result );
1222 })
1223
1224 VISIT_END( Expr, node );
1225}
1226
1227//--------------------------------------------------------------------------
1228// SizeofExpr
[7ff3e522]1229template< typename core_t >
1230const ast::Expr * ast::Pass< core_t >::visit( const ast::SizeofExpr * node ) {
[17a0228a]1231 VISIT_START( node );
1232
1233 VISIT({
[0e42794]1234 guard_symtab guard { *this };
[17a0228a]1235 maybe_accept( node, &SizeofExpr::result );
1236 }
1237 if ( node->type ) {
1238 maybe_accept( node, &SizeofExpr::type );
1239 } else {
1240 maybe_accept( node, &SizeofExpr::expr );
1241 }
1242 )
1243
1244 VISIT_END( Expr, node );
1245}
1246
1247//--------------------------------------------------------------------------
1248// AlignofExpr
[7ff3e522]1249template< typename core_t >
1250const ast::Expr * ast::Pass< core_t >::visit( const ast::AlignofExpr * node ) {
[17a0228a]1251 VISIT_START( node );
1252
1253 VISIT({
[0e42794]1254 guard_symtab guard { *this };
[17a0228a]1255 maybe_accept( node, &AlignofExpr::result );
1256 }
1257 if ( node->type ) {
1258 maybe_accept( node, &AlignofExpr::type );
1259 } else {
1260 maybe_accept( node, &AlignofExpr::expr );
1261 }
1262 )
1263
1264 VISIT_END( Expr, node );
1265}
1266
1267//--------------------------------------------------------------------------
1268// UntypedOffsetofExpr
[7ff3e522]1269template< typename core_t >
1270const ast::Expr * ast::Pass< core_t >::visit( const ast::UntypedOffsetofExpr * node ) {
[17a0228a]1271 VISIT_START( node );
1272
1273 VISIT({
[0e42794]1274 guard_symtab guard { *this };
[17a0228a]1275 maybe_accept( node, &UntypedOffsetofExpr::result );
1276 }
1277 maybe_accept( node, &UntypedOffsetofExpr::type );
1278 )
1279
1280 VISIT_END( Expr, node );
1281}
1282
1283//--------------------------------------------------------------------------
1284// OffsetofExpr
[7ff3e522]1285template< typename core_t >
1286const ast::Expr * ast::Pass< core_t >::visit( const ast::OffsetofExpr * node ) {
[17a0228a]1287 VISIT_START( node );
1288
1289 VISIT({
[0e42794]1290 guard_symtab guard { *this };
[17a0228a]1291 maybe_accept( node, &OffsetofExpr::result );
1292 }
1293 maybe_accept( node, &OffsetofExpr::type );
1294 )
1295
1296 VISIT_END( Expr, node );
1297}
1298
1299//--------------------------------------------------------------------------
1300// OffsetPackExpr
[7ff3e522]1301template< typename core_t >
1302const ast::Expr * ast::Pass< core_t >::visit( const ast::OffsetPackExpr * node ) {
[17a0228a]1303 VISIT_START( node );
1304
1305 VISIT({
[0e42794]1306 guard_symtab guard { *this };
[17a0228a]1307 maybe_accept( node, &OffsetPackExpr::result );
1308 }
1309 maybe_accept( node, &OffsetPackExpr::type );
1310 )
1311
1312 VISIT_END( Expr, node );
1313}
1314
1315//--------------------------------------------------------------------------
1316// LogicalExpr
[7ff3e522]1317template< typename core_t >
1318const ast::Expr * ast::Pass< core_t >::visit( const ast::LogicalExpr * node ) {
[17a0228a]1319 VISIT_START( node );
1320
1321 VISIT({
[0e42794]1322 guard_symtab guard { *this };
[17a0228a]1323 maybe_accept( node, &LogicalExpr::result );
1324 }
1325 maybe_accept( node, &LogicalExpr::arg1 );
1326 maybe_accept( node, &LogicalExpr::arg2 );
1327 )
1328
1329 VISIT_END( Expr, node );
1330}
1331
1332//--------------------------------------------------------------------------
1333// ConditionalExpr
[7ff3e522]1334template< typename core_t >
1335const ast::Expr * ast::Pass< core_t >::visit( const ast::ConditionalExpr * node ) {
[17a0228a]1336 VISIT_START( node );
1337
1338 VISIT({
[0e42794]1339 guard_symtab guard { *this };
[17a0228a]1340 maybe_accept( node, &ConditionalExpr::result );
1341 }
1342 maybe_accept( node, &ConditionalExpr::arg1 );
1343 maybe_accept( node, &ConditionalExpr::arg2 );
1344 maybe_accept( node, &ConditionalExpr::arg3 );
1345 )
1346
1347 VISIT_END( Expr, node );
1348}
[10a1225]1349
[17a0228a]1350//--------------------------------------------------------------------------
1351// CommaExpr
[7ff3e522]1352template< typename core_t >
1353const ast::Expr * ast::Pass< core_t >::visit( const ast::CommaExpr * node ) {
[17a0228a]1354 VISIT_START( node );
1355
1356 VISIT({
[0e42794]1357 guard_symtab guard { *this };
[17a0228a]1358 maybe_accept( node, &CommaExpr::result );
1359 }
1360 maybe_accept( node, &CommaExpr::arg1 );
1361 maybe_accept( node, &CommaExpr::arg2 );
1362 )
1363
1364 VISIT_END( Expr, node );
1365}
1366
1367//--------------------------------------------------------------------------
1368// TypeExpr
[7ff3e522]1369template< typename core_t >
1370const ast::Expr * ast::Pass< core_t >::visit( const ast::TypeExpr * node ) {
[17a0228a]1371 VISIT_START( node );
1372
1373 VISIT({
[0e42794]1374 guard_symtab guard { *this };
[17a0228a]1375 maybe_accept( node, &TypeExpr::result );
1376 }
1377 maybe_accept( node, &TypeExpr::type );
1378 )
1379
1380 VISIT_END( Expr, node );
1381}
1382
1383//--------------------------------------------------------------------------
1384// AsmExpr
[7ff3e522]1385template< typename core_t >
1386const ast::Expr * ast::Pass< core_t >::visit( const ast::AsmExpr * node ) {
[17a0228a]1387 VISIT_START( node );
[10a1225]1388
[17a0228a]1389 VISIT({
[0e42794]1390 guard_symtab guard { *this };
[17a0228a]1391 maybe_accept( node, &AsmExpr::result );
1392 }
1393 maybe_accept( node, &AsmExpr::constraint );
1394 maybe_accept( node, &AsmExpr::operand );
1395 )
[10a1225]1396
[17a0228a]1397 VISIT_END( Expr, node );
1398}
[10a1225]1399
[17a0228a]1400//--------------------------------------------------------------------------
1401// ImplicitCopyCtorExpr
[7ff3e522]1402template< typename core_t >
1403const ast::Expr * ast::Pass< core_t >::visit( const ast::ImplicitCopyCtorExpr * node ) {
[17a0228a]1404 VISIT_START( node );
1405
1406 VISIT({
[0e42794]1407 guard_symtab guard { *this };
[17a0228a]1408 maybe_accept( node, &ImplicitCopyCtorExpr::result );
1409 }
1410 maybe_accept( node, &ImplicitCopyCtorExpr::callExpr );
1411 )
1412
1413 VISIT_END( Expr, node );
1414}
1415
1416//--------------------------------------------------------------------------
1417// ConstructorExpr
[7ff3e522]1418template< typename core_t >
1419const ast::Expr * ast::Pass< core_t >::visit( const ast::ConstructorExpr * node ) {
[17a0228a]1420 VISIT_START( node );
1421
1422 VISIT({
[0e42794]1423 guard_symtab guard { *this };
[17a0228a]1424 maybe_accept( node, &ConstructorExpr::result );
1425 }
1426 maybe_accept( node, &ConstructorExpr::callExpr );
1427 )
[10a1225]1428
[17a0228a]1429 VISIT_END( Expr, node );
1430}
1431
1432//--------------------------------------------------------------------------
1433// CompoundLiteralExpr
[7ff3e522]1434template< typename core_t >
1435const ast::Expr * ast::Pass< core_t >::visit( const ast::CompoundLiteralExpr * node ) {
[17a0228a]1436 VISIT_START( node );
1437
1438 VISIT({
[0e42794]1439 guard_symtab guard { *this };
[17a0228a]1440 maybe_accept( node, &CompoundLiteralExpr::result );
1441 }
1442 maybe_accept( node, &CompoundLiteralExpr::init );
1443 )
1444
1445 VISIT_END( Expr, node );
1446}
1447
1448//--------------------------------------------------------------------------
1449// RangeExpr
[7ff3e522]1450template< typename core_t >
1451const ast::Expr * ast::Pass< core_t >::visit( const ast::RangeExpr * node ) {
[17a0228a]1452 VISIT_START( node );
1453
1454 VISIT({
[0e42794]1455 guard_symtab guard { *this };
[17a0228a]1456 maybe_accept( node, &RangeExpr::result );
1457 }
1458 maybe_accept( node, &RangeExpr::low );
1459 maybe_accept( node, &RangeExpr::high );
1460 )
1461
1462 VISIT_END( Expr, node );
1463}
1464
1465//--------------------------------------------------------------------------
1466// UntypedTupleExpr
[7ff3e522]1467template< typename core_t >
1468const ast::Expr * ast::Pass< core_t >::visit( const ast::UntypedTupleExpr * node ) {
[17a0228a]1469 VISIT_START( node );
1470
1471 VISIT({
[0e42794]1472 guard_symtab guard { *this };
[17a0228a]1473 maybe_accept( node, &UntypedTupleExpr::result );
1474 }
1475 maybe_accept( node, &UntypedTupleExpr::exprs );
1476 )
1477
1478 VISIT_END( Expr, node );
1479}
1480
1481//--------------------------------------------------------------------------
1482// TupleExpr
[7ff3e522]1483template< typename core_t >
1484const ast::Expr * ast::Pass< core_t >::visit( const ast::TupleExpr * node ) {
[17a0228a]1485 VISIT_START( node );
1486
1487 VISIT({
[0e42794]1488 guard_symtab guard { *this };
[17a0228a]1489 maybe_accept( node, &TupleExpr::result );
1490 }
1491 maybe_accept( node, &TupleExpr::exprs );
1492 )
1493
1494 VISIT_END( Expr, node );
1495}
1496
1497//--------------------------------------------------------------------------
1498// TupleIndexExpr
[7ff3e522]1499template< typename core_t >
1500const ast::Expr * ast::Pass< core_t >::visit( const ast::TupleIndexExpr * node ) {
[17a0228a]1501 VISIT_START( node );
1502
1503 VISIT({
[0e42794]1504 guard_symtab guard { *this };
[17a0228a]1505 maybe_accept( node, &TupleIndexExpr::result );
1506 }
1507 maybe_accept( node, &TupleIndexExpr::tuple );
1508 )
1509
1510 VISIT_END( Expr, node );
1511}
1512
1513//--------------------------------------------------------------------------
1514// TupleAssignExpr
[7ff3e522]1515template< typename core_t >
1516const ast::Expr * ast::Pass< core_t >::visit( const ast::TupleAssignExpr * node ) {
[17a0228a]1517 VISIT_START( node );
1518
1519 VISIT({
[0e42794]1520 guard_symtab guard { *this };
[17a0228a]1521 maybe_accept( node, &TupleAssignExpr::result );
1522 }
1523 maybe_accept( node, &TupleAssignExpr::stmtExpr );
1524 )
1525
1526 VISIT_END( Expr, node );
1527}
1528
1529//--------------------------------------------------------------------------
1530// StmtExpr
[7ff3e522]1531template< typename core_t >
1532const ast::Expr * ast::Pass< core_t >::visit( const ast::StmtExpr * node ) {
[17a0228a]1533 VISIT_START( node );
1534
1535 VISIT(// don't want statements from outer CompoundStmts to be added to this StmtExpr
1536 // get the stmts that will need to be spliced in
[7ff3e522]1537 auto stmts_before = __pass::stmtsToAddBefore( core, 0);
1538 auto stmts_after = __pass::stmtsToAddAfter ( core, 0);
[17a0228a]1539
1540 // These may be modified by subnode but most be restored once we exit this statemnet.
[b2a11ba]1541 ValueGuardPtr< const ast::TypeSubstitution * > __old_env( __pass::typeSubs( core, 0 ) );
[17a0228a]1542 ValueGuardPtr< typename std::remove_pointer< decltype(stmts_before) >::type > __old_decls_before( stmts_before );
1543 ValueGuardPtr< typename std::remove_pointer< decltype(stmts_after ) >::type > __old_decls_after ( stmts_after );
1544
1545 {
[0e42794]1546 guard_symtab guard { *this };
[17a0228a]1547 maybe_accept( node, &StmtExpr::result );
1548 }
1549 maybe_accept( node, &StmtExpr::stmts );
1550 maybe_accept( node, &StmtExpr::returnDecls );
1551 maybe_accept( node, &StmtExpr::dtors );
1552 )
1553
1554 VISIT_END( Expr, node );
1555}
1556
1557//--------------------------------------------------------------------------
1558// UniqueExpr
[7ff3e522]1559template< typename core_t >
1560const ast::Expr * ast::Pass< core_t >::visit( const ast::UniqueExpr * node ) {
[17a0228a]1561 VISIT_START( node );
1562
1563 VISIT({
[0e42794]1564 guard_symtab guard { *this };
[17a0228a]1565 maybe_accept( node, &UniqueExpr::result );
1566 }
1567 maybe_accept( node, &UniqueExpr::expr );
1568 )
1569
1570 VISIT_END( Expr, node );
1571}
1572
1573//--------------------------------------------------------------------------
1574// UntypedInitExpr
[7ff3e522]1575template< typename core_t >
1576const ast::Expr * ast::Pass< core_t >::visit( const ast::UntypedInitExpr * node ) {
[17a0228a]1577 VISIT_START( node );
1578
1579 VISIT({
[0e42794]1580 guard_symtab guard { *this };
[17a0228a]1581 maybe_accept( node, &UntypedInitExpr::result );
1582 }
1583 maybe_accept( node, &UntypedInitExpr::expr );
1584 // not currently visiting initAlts, but this doesn't matter since this node is only used in the resolver.
1585 )
1586
1587 VISIT_END( Expr, node );
1588}
1589
1590//--------------------------------------------------------------------------
1591// InitExpr
[7ff3e522]1592template< typename core_t >
1593const ast::Expr * ast::Pass< core_t >::visit( const ast::InitExpr * node ) {
[17a0228a]1594 VISIT_START( node );
1595
1596 VISIT({
[0e42794]1597 guard_symtab guard { *this };
[17a0228a]1598 maybe_accept( node, &InitExpr::result );
1599 }
1600 maybe_accept( node, &InitExpr::expr );
1601 maybe_accept( node, &InitExpr::designation );
1602 )
1603
1604 VISIT_END( Expr, node );
1605}
1606
1607//--------------------------------------------------------------------------
1608// DeletedExpr
[7ff3e522]1609template< typename core_t >
1610const ast::Expr * ast::Pass< core_t >::visit( const ast::DeletedExpr * node ) {
[17a0228a]1611 VISIT_START( node );
1612
1613 VISIT({
[0e42794]1614 guard_symtab guard { *this };
[17a0228a]1615 maybe_accept( node, &DeletedExpr::result );
1616 }
1617 maybe_accept( node, &DeletedExpr::expr );
1618 // don't visit deleteStmt, because it is a pointer to somewhere else in the tree.
1619 )
1620
1621 VISIT_END( Expr, node );
1622}
1623
1624//--------------------------------------------------------------------------
1625// DefaultArgExpr
[7ff3e522]1626template< typename core_t >
1627const ast::Expr * ast::Pass< core_t >::visit( const ast::DefaultArgExpr * node ) {
[17a0228a]1628 VISIT_START( node );
1629
1630 VISIT({
[0e42794]1631 guard_symtab guard { *this };
[17a0228a]1632 maybe_accept( node, &DefaultArgExpr::result );
1633 }
1634 maybe_accept( node, &DefaultArgExpr::expr );
1635 )
1636
1637 VISIT_END( Expr, node );
1638}
1639
1640//--------------------------------------------------------------------------
1641// GenericExpr
[7ff3e522]1642template< typename core_t >
1643const ast::Expr * ast::Pass< core_t >::visit( const ast::GenericExpr * node ) {
[17a0228a]1644 VISIT_START( node );
1645
1646 VISIT({
[0e42794]1647 guard_symtab guard { *this };
[17a0228a]1648 maybe_accept( node, &GenericExpr::result );
1649 }
1650 maybe_accept( node, &GenericExpr::control );
1651
1652 std::vector<GenericExpr::Association> new_kids;
1653 new_kids.reserve(node->associations.size());
1654 bool mutated = false;
1655 for( const auto & assoc : node->associations ) {
[b0abc8a0]1656 const Type * type = nullptr;
[17a0228a]1657 if( assoc.type ) {
[0e42794]1658 guard_symtab guard { *this };
[17a0228a]1659 type = assoc.type->accept( *this );
1660 if( type != assoc.type ) mutated = true;
1661 }
[b0abc8a0]1662 const Expr * expr = nullptr;
[17a0228a]1663 if( assoc.expr ) {
1664 expr = assoc.expr->accept( *this );
1665 if( expr != assoc.expr ) mutated = true;
1666 }
1667 new_kids.emplace_back( type, expr );
1668 }
1669
1670 if(mutated) {
[d3aa64f1]1671 auto n = __pass::mutate<core_t>(node);
[17a0228a]1672 n->associations = std::move( new_kids );
1673 node = n;
1674 }
1675 )
1676
1677 VISIT_END( Expr, node );
1678}
[10a1225]1679
[e0016a5]1680//--------------------------------------------------------------------------
1681// VoidType
[7ff3e522]1682template< typename core_t >
1683const ast::Type * ast::Pass< core_t >::visit( const ast::VoidType * node ) {
[e0016a5]1684 VISIT_START( node );
[10a1225]1685
[e0016a5]1686 VISIT_END( Type, node );
1687}
[10a1225]1688
[e0016a5]1689//--------------------------------------------------------------------------
1690// BasicType
[7ff3e522]1691template< typename core_t >
1692const ast::Type * ast::Pass< core_t >::visit( const ast::BasicType * node ) {
[e0016a5]1693 VISIT_START( node );
1694
1695 VISIT_END( Type, node );
1696}
1697
1698//--------------------------------------------------------------------------
1699// PointerType
[7ff3e522]1700template< typename core_t >
1701const ast::Type * ast::Pass< core_t >::visit( const ast::PointerType * node ) {
[e0016a5]1702 VISIT_START( node );
1703
1704 VISIT(
1705 // xxx - should PointerType visit/mutate dimension?
1706 maybe_accept( node, &PointerType::base );
1707 )
1708
1709 VISIT_END( Type, node );
1710}
1711
1712//--------------------------------------------------------------------------
1713// ArrayType
[7ff3e522]1714template< typename core_t >
1715const ast::Type * ast::Pass< core_t >::visit( const ast::ArrayType * node ) {
[e0016a5]1716 VISIT_START( node );
1717
1718 VISIT(
1719 maybe_accept( node, &ArrayType::dimension );
1720 maybe_accept( node, &ArrayType::base );
1721 )
1722
1723 VISIT_END( Type, node );
1724}
1725
1726//--------------------------------------------------------------------------
1727// ReferenceType
[7ff3e522]1728template< typename core_t >
1729const ast::Type * ast::Pass< core_t >::visit( const ast::ReferenceType * node ) {
[e0016a5]1730 VISIT_START( node );
1731
1732 VISIT(
1733 maybe_accept( node, &ReferenceType::base );
1734 )
1735
1736 VISIT_END( Type, node );
1737}
1738
1739//--------------------------------------------------------------------------
1740// QualifiedType
[7ff3e522]1741template< typename core_t >
1742const ast::Type * ast::Pass< core_t >::visit( const ast::QualifiedType * node ) {
[e0016a5]1743 VISIT_START( node );
1744
1745 VISIT(
1746 maybe_accept( node, &QualifiedType::parent );
1747 maybe_accept( node, &QualifiedType::child );
1748 )
1749
1750 VISIT_END( Type, node );
1751}
1752
1753//--------------------------------------------------------------------------
1754// FunctionType
[7ff3e522]1755template< typename core_t >
1756const ast::Type * ast::Pass< core_t >::visit( const ast::FunctionType * node ) {
[e0016a5]1757 VISIT_START( node );
1758
[e0e9a0b]1759 VISIT({
1760 guard_forall_subs forall_guard { *this, node };
1761 mutate_forall( node );
[e0016a5]1762 maybe_accept( node, &FunctionType::returns );
1763 maybe_accept( node, &FunctionType::params );
[e0e9a0b]1764 })
[e0016a5]1765
1766 VISIT_END( Type, node );
1767}
1768
1769//--------------------------------------------------------------------------
1770// StructInstType
[7ff3e522]1771template< typename core_t >
1772const ast::Type * ast::Pass< core_t >::visit( const ast::StructInstType * node ) {
[e0016a5]1773 VISIT_START( node );
1774
[7ff3e522]1775 __pass::symtab::addStruct( core, 0, node->name );
[e0016a5]1776
1777 VISIT({
[0e42794]1778 guard_symtab guard { *this };
[e0016a5]1779 maybe_accept( node, &StructInstType::params );
1780 })
1781
1782 VISIT_END( Type, node );
1783}
1784
1785//--------------------------------------------------------------------------
1786// UnionInstType
[7ff3e522]1787template< typename core_t >
1788const ast::Type * ast::Pass< core_t >::visit( const ast::UnionInstType * node ) {
[e0016a5]1789 VISIT_START( node );
1790
[7ff3e522]1791 __pass::symtab::addUnion( core, 0, node->name );
[e0016a5]1792
[e0e9a0b]1793 VISIT({
[0e42794]1794 guard_symtab guard { *this };
[e0016a5]1795 maybe_accept( node, &UnionInstType::params );
[e0e9a0b]1796 })
[e0016a5]1797
1798 VISIT_END( Type, node );
1799}
1800
1801//--------------------------------------------------------------------------
1802// EnumInstType
[7ff3e522]1803template< typename core_t >
1804const ast::Type * ast::Pass< core_t >::visit( const ast::EnumInstType * node ) {
[e0016a5]1805 VISIT_START( node );
1806
[e0e9a0b]1807 VISIT({
[e0016a5]1808 maybe_accept( node, &EnumInstType::params );
[e0e9a0b]1809 })
[e0016a5]1810
1811 VISIT_END( Type, node );
1812}
1813
1814//--------------------------------------------------------------------------
1815// TraitInstType
[7ff3e522]1816template< typename core_t >
1817const ast::Type * ast::Pass< core_t >::visit( const ast::TraitInstType * node ) {
[e0016a5]1818 VISIT_START( node );
1819
[e0e9a0b]1820 VISIT({
[e0016a5]1821 maybe_accept( node, &TraitInstType::params );
[e0e9a0b]1822 })
[e0016a5]1823
1824 VISIT_END( Type, node );
1825}
1826
1827//--------------------------------------------------------------------------
1828// TypeInstType
[7ff3e522]1829template< typename core_t >
1830const ast::Type * ast::Pass< core_t >::visit( const ast::TypeInstType * node ) {
[e0016a5]1831 VISIT_START( node );
1832
1833 VISIT(
[e0e9a0b]1834 {
1835 maybe_accept( node, &TypeInstType::params );
1836 }
1837 // ensure that base re-bound if doing substitution
[7ff3e522]1838 __pass::forall::replace( core, 0, node );
[e0016a5]1839 )
1840
1841 VISIT_END( Type, node );
1842}
1843
1844//--------------------------------------------------------------------------
1845// TupleType
[7ff3e522]1846template< typename core_t >
1847const ast::Type * ast::Pass< core_t >::visit( const ast::TupleType * node ) {
[e0016a5]1848 VISIT_START( node );
1849
1850 VISIT(
1851 maybe_accept( node, &TupleType::types );
1852 maybe_accept( node, &TupleType::members );
1853 )
1854
1855 VISIT_END( Type, node );
1856}
1857
1858//--------------------------------------------------------------------------
1859// TypeofType
[7ff3e522]1860template< typename core_t >
1861const ast::Type * ast::Pass< core_t >::visit( const ast::TypeofType * node ) {
[e0016a5]1862 VISIT_START( node );
1863
1864 VISIT(
1865 maybe_accept( node, &TypeofType::expr );
1866 )
1867
1868 VISIT_END( Type, node );
1869}
1870
1871//--------------------------------------------------------------------------
1872// VarArgsType
[7ff3e522]1873template< typename core_t >
1874const ast::Type * ast::Pass< core_t >::visit( const ast::VarArgsType * node ) {
[e0016a5]1875 VISIT_START( node );
1876
1877 VISIT_END( Type, node );
1878}
1879
1880//--------------------------------------------------------------------------
1881// ZeroType
[7ff3e522]1882template< typename core_t >
1883const ast::Type * ast::Pass< core_t >::visit( const ast::ZeroType * node ) {
[e0016a5]1884 VISIT_START( node );
1885
1886 VISIT_END( Type, node );
1887}
1888
1889//--------------------------------------------------------------------------
1890// OneType
[7ff3e522]1891template< typename core_t >
1892const ast::Type * ast::Pass< core_t >::visit( const ast::OneType * node ) {
[e0016a5]1893 VISIT_START( node );
1894
1895 VISIT_END( Type, node );
1896}
1897
1898//--------------------------------------------------------------------------
1899// GlobalScopeType
[7ff3e522]1900template< typename core_t >
1901const ast::Type * ast::Pass< core_t >::visit( const ast::GlobalScopeType * node ) {
[e0016a5]1902 VISIT_START( node );
1903
1904 VISIT_END( Type, node );
1905}
1906
1907
1908//--------------------------------------------------------------------------
1909// Designation
[7ff3e522]1910template< typename core_t >
1911const ast::Designation * ast::Pass< core_t >::visit( const ast::Designation * node ) {
[e0016a5]1912 VISIT_START( node );
1913
1914 VISIT( maybe_accept( node, &Designation::designators ); )
1915
1916 VISIT_END( Designation, node );
1917}
[10a1225]1918
[6d51bd7]1919//--------------------------------------------------------------------------
1920// SingleInit
[7ff3e522]1921template< typename core_t >
1922const ast::Init * ast::Pass< core_t >::visit( const ast::SingleInit * node ) {
[6d51bd7]1923 VISIT_START( node );
1924
1925 VISIT(
1926 maybe_accept( node, &SingleInit::value );
1927 )
1928
1929 VISIT_END( Init, node );
1930}
1931
1932//--------------------------------------------------------------------------
1933// ListInit
[7ff3e522]1934template< typename core_t >
1935const ast::Init * ast::Pass< core_t >::visit( const ast::ListInit * node ) {
[6d51bd7]1936 VISIT_START( node );
1937
1938 VISIT(
1939 maybe_accept( node, &ListInit::designations );
1940 maybe_accept( node, &ListInit::initializers );
1941 )
1942
1943 VISIT_END( Init, node );
1944}
1945
1946//--------------------------------------------------------------------------
1947// ConstructorInit
[7ff3e522]1948template< typename core_t >
1949const ast::Init * ast::Pass< core_t >::visit( const ast::ConstructorInit * node ) {
[6d51bd7]1950 VISIT_START( node );
1951
1952 VISIT(
1953 maybe_accept( node, &ConstructorInit::ctor );
1954 maybe_accept( node, &ConstructorInit::dtor );
1955 maybe_accept( node, &ConstructorInit::init );
1956 )
1957
1958 VISIT_END( Init, node );
1959}
1960
[f47f887]1961//--------------------------------------------------------------------------
1962// Attribute
[7ff3e522]1963template< typename core_t >
1964const ast::Attribute * ast::Pass< core_t >::visit( const ast::Attribute * node ) {
[6d51bd7]1965 VISIT_START( node );
[f47f887]1966
1967 VISIT(
[489bacf]1968 maybe_accept( node, &Attribute::params );
[f47f887]1969 )
1970
[8a5530c]1971 VISIT_END( Attribute, node );
[f47f887]1972}
1973
1974//--------------------------------------------------------------------------
1975// TypeSubstitution
[7ff3e522]1976template< typename core_t >
1977const ast::TypeSubstitution * ast::Pass< core_t >::visit( const ast::TypeSubstitution * node ) {
[6d51bd7]1978 VISIT_START( node );
[f47f887]1979
[6d51bd7]1980 VISIT(
1981 {
1982 bool mutated = false;
1983 std::unordered_map< std::string, ast::ptr< ast::Type > > new_map;
1984 for ( const auto & p : node->typeEnv ) {
[0e42794]1985 guard_symtab guard { *this };
[6d51bd7]1986 auto new_node = p.second->accept( *this );
[417117e]1987 if (new_node != p.second) mutated = true;
[6d51bd7]1988 new_map.insert({ p.first, new_node });
1989 }
1990 if (mutated) {
[d3aa64f1]1991 auto new_node = __pass::mutate<core_t>( node );
[6d51bd7]1992 new_node->typeEnv.swap( new_map );
1993 node = new_node;
1994 }
1995 }
[f47f887]1996
[6d51bd7]1997 {
1998 bool mutated = false;
1999 std::unordered_map< std::string, ast::ptr< ast::Expr > > new_map;
2000 for ( const auto & p : node->varEnv ) {
[0e42794]2001 guard_symtab guard { *this };
[6d51bd7]2002 auto new_node = p.second->accept( *this );
[417117e]2003 if (new_node != p.second) mutated = true;
[6d51bd7]2004 new_map.insert({ p.first, new_node });
2005 }
2006 if (mutated) {
[d3aa64f1]2007 auto new_node = __pass::mutate<core_t>( node );
[6d51bd7]2008 new_node->varEnv.swap( new_map );
2009 node = new_node;
2010 }
2011 }
2012 )
[f47f887]2013
[6d51bd7]2014 VISIT_END( TypeSubstitution, node );
[f47f887]2015}
2016
2017#undef VISIT_START
2018#undef VISIT
[112fe04]2019#undef VISIT_END
Note: See TracBrowser for help on using the repository browser.