Changeset 9a8930f for src/CodeGen
- Timestamp:
- Jun 4, 2015, 2:07:40 PM (10 years ago)
- Branches:
- ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, ctor, deferred_resn, demangler, enum, forall-pointer-decay, gc_noraii, jacob/cs343-translation, jenkins-sandbox, master, memory, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, string, with_gc
- Children:
- 0423f25, eb3261f
- Parents:
- a61fea9a (diff), 1136d96 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the(diff)
links above to see all the changes relative to each parent. - Location:
- src/CodeGen
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
src/CodeGen/CodeGenerator.cc
ra61fea9a r9a8930f 5 5 // file "LICENCE" distributed with Cforall. 6 6 // 7 // CodeGenerator 2.cc --7 // CodeGenerator.cc -- 8 8 // 9 9 // Author : Richard C. Bilson 10 10 // Created On : Mon May 18 07:44:20 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Wed Jun 3 11:53:32201513 // Update Count : 1 312 // Last Modified On : Thu Jun 4 14:05:45 2015 13 // Update Count : 120 14 14 // 15 15 … … 35 35 36 36 namespace CodeGen { 37 int CodeGenerator2::tabsize = 4; 38 39 CodeGenerator2::CodeGenerator2( std::ostream &os ) : cur_indent( 0 ), insideFunction( false ), before( os ), after() { } 40 41 CodeGenerator2::CodeGenerator2( std::ostream &os, std::string init, int indent, bool infunp ) 42 : cur_indent( indent ), insideFunction( infunp ), before( os ) { 43 //before << std::string( init ); 44 } 45 46 CodeGenerator2::CodeGenerator2( std::ostream &os, char *init, int indent, bool infunp ) 47 : cur_indent( indent ), insideFunction( infunp ), before( os ) { 48 //before << std::string( init ); 37 int CodeGenerator::tabsize = 4; 38 39 // the kinds of statements that would ideally be separated by more whitespace 40 bool wantSpacing( Statement * stmt) { 41 return dynamic_cast< IfStmt * >( stmt ) || dynamic_cast< CompoundStmt * >( stmt ) || 42 dynamic_cast< WhileStmt * >( stmt ) || dynamic_cast< ForStmt * > ( stmt ) || dynamic_cast< SwitchStmt *>( stmt ); 43 } 44 45 CodeGenerator::CodeGenerator( std::ostream &os ) : cur_indent( 0 ), insideFunction( false ), output( os ) { } 46 47 CodeGenerator::CodeGenerator( std::ostream &os, std::string init, int indent, bool infunp ) 48 : cur_indent( indent ), insideFunction( infunp ), output( os ) { 49 //output << std::string( init ); 50 } 51 52 CodeGenerator::CodeGenerator( std::ostream &os, char *init, int indent, bool infunp ) 53 : cur_indent( indent ), insideFunction( infunp ), output( os ) { 54 //output << std::string( init ); 49 55 } 50 56 … … 58 64 59 65 //*** Declarations 60 void CodeGenerator 2::visit( FunctionDecl *functionDecl ) {66 void CodeGenerator::visit( FunctionDecl *functionDecl ) { 61 67 handleStorageClass( functionDecl ); 62 68 if ( functionDecl->get_isInline() ) { 63 before<< "inline ";64 } // if 65 before<< genType( functionDecl->get_functionType(), mangleName( functionDecl ) );69 output << "inline "; 70 } // if 71 output << genType( functionDecl->get_functionType(), mangleName( functionDecl ) ); 66 72 67 73 // how to get this to the Functype? 68 74 std::list< Declaration * > olds = functionDecl->get_oldDecls(); 69 75 if ( ! olds.empty() ) { 70 before<< " /* function has old declaration */";76 output << " /* function has old declaration */"; 71 77 } // if 72 78 … … 77 83 } 78 84 79 void CodeGenerator 2::visit( ObjectDecl *objectDecl ) {85 void CodeGenerator::visit( ObjectDecl *objectDecl ) { 80 86 handleStorageClass( objectDecl ); 81 before<< genType( objectDecl->get_type(), mangleName( objectDecl ) );87 output << genType( objectDecl->get_type(), mangleName( objectDecl ) ); 82 88 83 89 if ( objectDecl->get_init() ) { 84 before<< " = ";90 output << " = "; 85 91 objectDecl->get_init()->accept( *this ); 86 92 } // if 87 93 if ( objectDecl->get_bitfieldWidth() ) { 88 before<< ":";94 output << ":"; 89 95 objectDecl->get_bitfieldWidth()->accept( *this ); 90 96 } // if 91 97 } 92 98 93 void CodeGenerator 2::handleAggregate( AggregateDecl *aggDecl ) {99 void CodeGenerator::handleAggregate( AggregateDecl *aggDecl ) { 94 100 if ( aggDecl->get_name() != "" ) 95 before<< aggDecl->get_name();101 output << aggDecl->get_name(); 96 102 97 103 std::list< Declaration * > &memb = aggDecl->get_members(); 98 104 99 105 if ( ! memb.empty() ) { 100 before<< endl << string( cur_indent, ' ' ) << "{" << endl;101 102 cur_indent += CodeGenerator 2::tabsize;106 output << endl << string( cur_indent, ' ' ) << "{" << endl; 107 108 cur_indent += CodeGenerator::tabsize; 103 109 for ( std::list< Declaration* >::iterator i = memb.begin(); i != memb.end(); i++) { 104 before<< string( cur_indent, ' ' );110 output << string( cur_indent, ' ' ); 105 111 (*i)->accept(*this ); 106 before<< ";" << endl;112 output << ";" << endl; 107 113 } 108 114 109 cur_indent -= CodeGenerator 2::tabsize;110 111 before<< string( cur_indent, ' ' ) << "}";112 } // if 113 } 114 115 void CodeGenerator 2::visit( StructDecl *structDecl ) {116 before<< "struct ";115 cur_indent -= CodeGenerator::tabsize; 116 117 output << string( cur_indent, ' ' ) << "}"; 118 } // if 119 } 120 121 void CodeGenerator::visit( StructDecl *structDecl ) { 122 output << "struct "; 117 123 handleAggregate( structDecl ); 118 124 } 119 125 120 void CodeGenerator 2::visit( UnionDecl *aggregateDecl ) {121 before<< "union ";126 void CodeGenerator::visit( UnionDecl *aggregateDecl ) { 127 output << "union "; 122 128 handleAggregate( aggregateDecl ); 123 129 } 124 130 125 void CodeGenerator 2::visit( EnumDecl *aggDecl ) {126 before<< "enum ";131 void CodeGenerator::visit( EnumDecl *aggDecl ) { 132 output << "enum "; 127 133 128 134 if ( aggDecl->get_name() != "" ) 129 before<< aggDecl->get_name();135 output << aggDecl->get_name(); 130 136 131 137 std::list< Declaration* > &memb = aggDecl->get_members(); 132 138 133 139 if ( ! memb.empty() ) { 134 before<< endl << "{" << endl;135 136 cur_indent += CodeGenerator 2::tabsize;140 output << endl << "{" << endl; 141 142 cur_indent += CodeGenerator::tabsize; 137 143 for ( std::list< Declaration* >::iterator i = memb.begin(); i != memb.end(); i++) { 138 144 ObjectDecl *obj = dynamic_cast< ObjectDecl* >( *i ); 139 145 assert( obj ); 140 before<< string( cur_indent, ' ' ) << mangleName( obj );146 output << string( cur_indent, ' ' ) << mangleName( obj ); 141 147 if ( obj->get_init() ) { 142 before<< " = ";148 output << " = "; 143 149 obj->get_init()->accept(*this ); 144 150 } // if 145 before<< "," << endl;151 output << "," << endl; 146 152 } // for 147 153 148 cur_indent -= CodeGenerator 2::tabsize;149 150 before<< "}" << endl;151 } // if 152 } 153 154 void CodeGenerator 2::visit( ContextDecl *aggregateDecl ) {}155 156 void CodeGenerator 2::visit( TypedefDecl *typeDecl ) {157 before<< "typedef ";158 before<< genType( typeDecl->get_base(), typeDecl->get_name() );159 } 160 161 void CodeGenerator 2::visit( TypeDecl *typeDecl ) {154 cur_indent -= CodeGenerator::tabsize; 155 156 output << "}" << endl; 157 } // if 158 } 159 160 void CodeGenerator::visit( ContextDecl *aggregateDecl ) {} 161 162 void CodeGenerator::visit( TypedefDecl *typeDecl ) { 163 output << "typedef "; 164 output << genType( typeDecl->get_base(), typeDecl->get_name() ); 165 } 166 167 void CodeGenerator::visit( TypeDecl *typeDecl ) { 162 168 // really, we should mutate this into something that isn't a TypeDecl but that requires large-scale changes, 163 169 // still to be done 164 before<< "extern unsigned long " << typeDecl->get_name();170 output << "extern unsigned long " << typeDecl->get_name(); 165 171 if ( typeDecl->get_base() ) { 166 before<< " = sizeof( " << genType( typeDecl->get_base(), "" ) << " )";167 } // if 168 } 169 170 void CodeGenerator 2::visit( SingleInit *init ) {172 output << " = sizeof( " << genType( typeDecl->get_base(), "" ) << " )"; 173 } // if 174 } 175 176 void CodeGenerator::visit( SingleInit *init ) { 171 177 init->get_value()->accept( *this ); 172 178 } 173 179 174 void CodeGenerator 2::visit( ListInit *init ) {175 before<< "{ ";180 void CodeGenerator::visit( ListInit *init ) { 181 output << "{ "; 176 182 genCommaList( init->begin_initializers(), init->end_initializers() ); 177 before<< " }";178 } 179 180 void CodeGenerator 2::visit( Constant *constant ) {181 before<< constant->get_value() ;183 output << " }"; 184 } 185 186 void CodeGenerator::visit( Constant *constant ) { 187 output << constant->get_value() ; 182 188 } 183 189 184 190 //*** Expressions 185 void CodeGenerator 2::visit( ApplicationExpr *applicationExpr ) {191 void CodeGenerator::visit( ApplicationExpr *applicationExpr ) { 186 192 if ( VariableExpr *varExpr = dynamic_cast< VariableExpr* >( applicationExpr->get_function() ) ) { 187 193 OperatorInfo opInfo; … … 214 220 assert( applicationExpr->get_args().size() == 2 ); 215 221 (*arg++)->accept( *this ); 216 before<< "[";217 (*arg)->accept( *this ); 218 before<< "]";222 output << "["; 223 (*arg)->accept( *this ); 224 output << "]"; 219 225 break; 220 226 … … 227 233 case OT_PREFIXASSIGN: 228 234 assert( applicationExpr->get_args().size() == 1 ); 229 before<< "(";230 before<< opInfo.symbol;231 (*arg)->accept( *this ); 232 before<< ")";235 output << "("; 236 output << opInfo.symbol; 237 (*arg)->accept( *this ); 238 output << ")"; 233 239 break; 234 240 … … 237 243 assert( applicationExpr->get_args().size() == 1 ); 238 244 (*arg)->accept( *this ); 239 before<< opInfo.symbol;245 output << opInfo.symbol; 240 246 break; 241 247 … … 243 249 case OT_INFIXASSIGN: 244 250 assert( applicationExpr->get_args().size() == 2 ); 245 before<< "(";251 output << "("; 246 252 (*arg++)->accept( *this ); 247 before<< opInfo.symbol;248 (*arg)->accept( *this ); 249 before<< ")";253 output << opInfo.symbol; 254 (*arg)->accept( *this ); 255 output << ")"; 250 256 break; 251 257 … … 256 262 } else { 257 263 varExpr->accept( *this ); 258 before<< "(";264 output << "("; 259 265 genCommaList( applicationExpr->get_args().begin(), applicationExpr->get_args().end() ); 260 before<< ")";266 output << ")"; 261 267 } // if 262 268 } else { 263 269 applicationExpr->get_function()->accept( *this ); 264 before<< "(";270 output << "("; 265 271 genCommaList( applicationExpr->get_args().begin(), applicationExpr->get_args().end() ); 266 before<< ")";267 } // if 268 } 269 270 void CodeGenerator 2::visit( UntypedExpr *untypedExpr ) {272 output << ")"; 273 } // if 274 } 275 276 void CodeGenerator::visit( UntypedExpr *untypedExpr ) { 271 277 if ( NameExpr *nameExpr = dynamic_cast< NameExpr* >( untypedExpr->get_function() ) ) { 272 278 OperatorInfo opInfo; … … 277 283 assert( untypedExpr->get_args().size() == 2 ); 278 284 (*arg++)->accept( *this ); 279 before<< "[";280 (*arg)->accept( *this ); 281 before<< "]";285 output << "["; 286 (*arg)->accept( *this ); 287 output << "]"; 282 288 break; 283 289 … … 289 295 case OT_PREFIXASSIGN: 290 296 assert( untypedExpr->get_args().size() == 1 ); 291 before<< "(";292 before<< opInfo.symbol;293 (*arg)->accept( *this ); 294 before<< ")";297 output << "("; 298 output << opInfo.symbol; 299 (*arg)->accept( *this ); 300 output << ")"; 295 301 break; 296 302 … … 299 305 assert( untypedExpr->get_args().size() == 1 ); 300 306 (*arg)->accept( *this ); 301 before<< opInfo.symbol;307 output << opInfo.symbol; 302 308 break; 303 309 … … 305 311 case OT_INFIXASSIGN: 306 312 assert( untypedExpr->get_args().size() == 2 ); 307 before<< "(";313 output << "("; 308 314 (*arg++)->accept( *this ); 309 before<< opInfo.symbol;310 (*arg)->accept( *this ); 311 before<< ")";315 output << opInfo.symbol; 316 (*arg)->accept( *this ); 317 output << ")"; 312 318 break; 313 319 … … 318 324 } else { 319 325 nameExpr->accept( *this ); 320 before<< "(";326 output << "("; 321 327 genCommaList( untypedExpr->get_args().begin(), untypedExpr->get_args().end() ); 322 before<< ")";328 output << ")"; 323 329 } // if 324 330 } else { 325 331 untypedExpr->get_function()->accept( *this ); 326 before<< "(";332 output << "("; 327 333 genCommaList( untypedExpr->get_args().begin(), untypedExpr->get_args().end() ); 328 before<< ")";329 } // if 330 } 331 332 void CodeGenerator 2::visit( NameExpr *nameExpr ) {334 output << ")"; 335 } // if 336 } 337 338 void CodeGenerator::visit( NameExpr *nameExpr ) { 333 339 OperatorInfo opInfo; 334 340 if ( operatorLookup( nameExpr->get_name(), opInfo ) ) { 335 341 assert( opInfo.type == OT_CONSTANT ); 336 before<< opInfo.symbol;337 } else { 338 before<< nameExpr->get_name();339 } // if 340 } 341 342 void CodeGenerator 2::visit( AddressExpr *addressExpr ) {343 before<< "(&";342 output << opInfo.symbol; 343 } else { 344 output << nameExpr->get_name(); 345 } // if 346 } 347 348 void CodeGenerator::visit( AddressExpr *addressExpr ) { 349 output << "(&"; 344 350 // this hack makes sure that we don't convert "constant_zero" to "0" if we're taking its address 345 351 if ( VariableExpr *variableExpr = dynamic_cast< VariableExpr* >( addressExpr->get_arg() ) ) { 346 before<< mangleName( variableExpr->get_var() );352 output << mangleName( variableExpr->get_var() ); 347 353 } else { 348 354 addressExpr->get_arg()->accept( *this ); 349 355 } // if 350 before<< ")";351 } 352 353 void CodeGenerator 2::visit( CastExpr *castExpr ) {354 before<< "((";356 output << ")"; 357 } 358 359 void CodeGenerator::visit( CastExpr *castExpr ) { 360 output << "(("; 355 361 if ( castExpr->get_results().empty() ) { 356 before<< "void" ;357 } else { 358 before<< genType( castExpr->get_results().front(), "" );359 } // if 360 before<< ")";362 output << "void" ; 363 } else { 364 output << genType( castExpr->get_results().front(), "" ); 365 } // if 366 output << ")"; 361 367 castExpr->get_arg()->accept( *this ); 362 before<< ")";363 } 364 365 void CodeGenerator 2::visit( UntypedMemberExpr *memberExpr ) {368 output << ")"; 369 } 370 371 void CodeGenerator::visit( UntypedMemberExpr *memberExpr ) { 366 372 assert( false ); 367 373 } 368 374 369 void CodeGenerator 2::visit( MemberExpr *memberExpr ) {375 void CodeGenerator::visit( MemberExpr *memberExpr ) { 370 376 memberExpr->get_aggregate()->accept( *this ); 371 before<< "." << mangleName( memberExpr->get_member() );372 } 373 374 void CodeGenerator 2::visit( VariableExpr *variableExpr ) {377 output << "." << mangleName( memberExpr->get_member() ); 378 } 379 380 void CodeGenerator::visit( VariableExpr *variableExpr ) { 375 381 OperatorInfo opInfo; 376 382 if ( variableExpr->get_var()->get_linkage() == LinkageSpec::Intrinsic && operatorLookup( variableExpr->get_var()->get_name(), opInfo ) && opInfo.type == OT_CONSTANT ) { 377 before<< opInfo.symbol;378 } else { 379 before<< mangleName( variableExpr->get_var() );380 } // if 381 } 382 383 void CodeGenerator 2::visit( ConstantExpr *constantExpr ) {383 output << opInfo.symbol; 384 } else { 385 output << mangleName( variableExpr->get_var() ); 386 } // if 387 } 388 389 void CodeGenerator::visit( ConstantExpr *constantExpr ) { 384 390 assert( constantExpr->get_constant() ); 385 391 constantExpr->get_constant()->accept( *this ); 386 392 } 387 393 388 void CodeGenerator 2::visit( SizeofExpr *sizeofExpr ) {389 before<< "sizeof(";394 void CodeGenerator::visit( SizeofExpr *sizeofExpr ) { 395 output << "sizeof("; 390 396 if ( sizeofExpr->get_isType() ) { 391 before<< genType( sizeofExpr->get_type(), "" );397 output << genType( sizeofExpr->get_type(), "" ); 392 398 } else { 393 399 sizeofExpr->get_expr()->accept( *this ); 394 400 } // if 395 before<< ")";396 } 397 398 void CodeGenerator 2::visit( LogicalExpr *logicalExpr ) {399 before<< "(";401 output << ")"; 402 } 403 404 void CodeGenerator::visit( LogicalExpr *logicalExpr ) { 405 output << "("; 400 406 logicalExpr->get_arg1()->accept( *this ); 401 407 if ( logicalExpr->get_isAnd() ) { 402 before<< " && ";403 } else { 404 before<< " || ";408 output << " && "; 409 } else { 410 output << " || "; 405 411 } // if 406 412 logicalExpr->get_arg2()->accept( *this ); 407 before<< ")";408 } 409 410 void CodeGenerator 2::visit( ConditionalExpr *conditionalExpr ) {411 before<< "(";413 output << ")"; 414 } 415 416 void CodeGenerator::visit( ConditionalExpr *conditionalExpr ) { 417 output << "("; 412 418 conditionalExpr->get_arg1()->accept( *this ); 413 before<< " ? ";419 output << " ? "; 414 420 conditionalExpr->get_arg2()->accept( *this ); 415 before<< " : ";421 output << " : "; 416 422 conditionalExpr->get_arg3()->accept( *this ); 417 before<< ")";418 } 419 420 void CodeGenerator 2::visit( CommaExpr *commaExpr ) {421 before<< "(";423 output << ")"; 424 } 425 426 void CodeGenerator::visit( CommaExpr *commaExpr ) { 427 output << "("; 422 428 commaExpr->get_arg1()->accept( *this ); 423 before<< " , ";429 output << " , "; 424 430 commaExpr->get_arg2()->accept( *this ); 425 before << ")"; 426 } 427 428 void CodeGenerator2::visit( TupleExpr *tupleExpr ) {} 429 430 void CodeGenerator2::visit( TypeExpr *typeExpr ) {} 431 432 431 output << ")"; 432 } 433 434 void CodeGenerator::visit( TupleExpr *tupleExpr ) {} 435 436 void CodeGenerator::visit( TypeExpr *typeExpr ) {} 437 433 438 //*** Statements 434 void CodeGenerator 2::visit( CompoundStmt *compoundStmt ) {439 void CodeGenerator::visit( CompoundStmt *compoundStmt ) { 435 440 std::list<Statement*> ks = compoundStmt->get_kids(); 436 437 before << endl << string( cur_indent, ' ' ) << "{" << endl; 438 439 cur_indent += CodeGenerator2::tabsize; 441 output << "{" << endl; 442 443 cur_indent += CodeGenerator::tabsize; 440 444 441 445 for ( std::list<Statement *>::iterator i = ks.begin(); i != ks.end(); i++) { 442 before << string( cur_indent, ' ' ) << printLabels( (*i)->get_labels() );446 output << string( cur_indent, ' ' ) << printLabels( (*i)->get_labels() ); 443 447 (*i)->accept(*this ); 444 shift_left(); 445 before << endl; 448 449 output << endl; 450 if ( wantSpacing( *i ) ) { 451 output << endl; 452 } 446 453 } 447 cur_indent -= CodeGenerator2::tabsize; 448 449 before << string( cur_indent, ' ' ) << "}" << endl; 450 } 451 452 void CodeGenerator2::visit( ExprStmt *exprStmt ) { 453 if ( exprStmt != 0 ) { 454 exprStmt->get_expr()->accept( *this ); 455 shift_left(); 456 before << ";" ; 457 } // if 458 } 459 460 void CodeGenerator2::visit( IfStmt *ifStmt ) { 461 before << "if ("; 454 cur_indent -= CodeGenerator::tabsize; 455 456 output << string( cur_indent, ' ' ) << "}"; 457 } 458 459 void CodeGenerator::visit( ExprStmt *exprStmt ) { 460 // I don't see why this check is necessary. 461 // If this starts to cause problems then put it back in, 462 // with an explanation 463 assert( exprStmt ); 464 465 // if ( exprStmt != 0 ) { 466 exprStmt->get_expr()->accept( *this ); 467 output << ";" ; 468 // } // if 469 } 470 471 void CodeGenerator::visit( IfStmt *ifStmt ) { 472 output << "if ("; 462 473 ifStmt->get_condition()->accept(*this ); 463 after += ")\n"; 464 shift_left(); 465 466 cur_indent += CodeGenerator2::tabsize; 467 before << string( cur_indent, ' ' ); 474 output << ") "; 475 468 476 ifStmt->get_thenPart()->accept(*this ); 469 cur_indent -= CodeGenerator2::tabsize;470 shift_left(); before << endl;471 477 472 478 if ( ifStmt->get_elsePart() != 0) { 473 before << string( cur_indent, ' ' ) << " else " << endl ; 474 475 cur_indent += CodeGenerator2::tabsize; 479 output << " else "; 476 480 ifStmt->get_elsePart()->accept(*this ); 477 cur_indent -= CodeGenerator2::tabsize; 478 } // if 479 } 480 481 void CodeGenerator2::visit( SwitchStmt *switchStmt ) { 482 //before << /* "\r" << */ string( cur_indent, ' ' ) << CodeGenerator2::printLabels( switchStmt->get_labels() ) 483 before << "switch (" ; 481 } // if 482 } 483 484 void CodeGenerator::visit( SwitchStmt *switchStmt ) { 485 //output << /* "\r" << */ string( cur_indent, ' ' ) << CodeGenerator::printLabels( switchStmt->get_labels() ) 486 output << "switch (" ; 484 487 switchStmt->get_condition()->accept(*this ); 485 after += ")\n"; 486 shift_left(); 487 488 before << string( cur_indent, ' ' ) << "{" << std::endl; 489 cur_indent += CodeGenerator2::tabsize; 490 491 std::list< Statement * > stmts = switchStmt->get_branches(); 492 bool lastBreak = false; 493 494 // horrible, horrible hack 495 if ( dynamic_cast<BranchStmt *>( stmts.back() ) != 0 ) { 496 lastBreak = true; 497 stmts.pop_back(); 498 } // if 499 acceptAll( stmts, *this ); 500 if ( lastBreak ) { 501 Statement *st = switchStmt->get_branches().back(); 502 before << CodeGenerator2::printLabels( st->get_labels()); 503 st->accept( *this ); 504 } // if 505 506 cur_indent -= CodeGenerator2::tabsize; 507 508 before << /* "\r" << */ string( cur_indent, ' ' ) << "}" << endl ; 509 } 510 511 void CodeGenerator2::visit( CaseStmt *caseStmt ) { 512 before << string( cur_indent, ' ' ); 488 output << ") "; 489 490 output << "{" << std::endl; 491 cur_indent += CodeGenerator::tabsize; 492 493 acceptAll( switchStmt->get_branches(), *this ); 494 495 cur_indent -= CodeGenerator::tabsize; 496 497 output << string( cur_indent, ' ' ) << "}"; 498 } 499 500 void CodeGenerator::visit( CaseStmt *caseStmt ) { 501 output << string( cur_indent, ' ' ); 513 502 if ( caseStmt->isDefault()) 514 before << "default ";503 output << "default"; 515 504 else { 516 before << "case ";505 output << "case "; 517 506 caseStmt->get_condition()->accept(*this ); 518 507 } // if 519 after += ":\n"; 520 shift_left(); 521 508 output << ":\n"; 509 522 510 std::list<Statement *> sts = caseStmt->get_statements(); 523 511 524 cur_indent += CodeGenerator 2::tabsize;512 cur_indent += CodeGenerator::tabsize; 525 513 for ( std::list<Statement *>::iterator i = sts.begin(); i != sts.end(); i++) { 526 before<< /* "\r" << */ string( cur_indent, ' ' ) << printLabels( (*i)->get_labels() ) ;514 output << /* "\r" << */ string( cur_indent, ' ' ) << printLabels( (*i)->get_labels() ) ; 527 515 (*i)->accept(*this ); 528 shift_left(); 529 before << ";" << endl; 516 output << endl; 530 517 } 531 cur_indent -= CodeGenerator2::tabsize; 532 } 533 534 void CodeGenerator2::visit( BranchStmt *branchStmt ) { 518 cur_indent -= CodeGenerator::tabsize; 519 } 520 521 void CodeGenerator::visit( BranchStmt *branchStmt ) { 522 output << "\r" << string( cur_indent, ' ' ); 523 output << CodeGenerator::printLabels( branchStmt->get_labels()); 524 535 525 switch ( branchStmt->get_type()) { 536 526 case BranchStmt::Goto: 537 527 if ( ! branchStmt->get_target().empty() ) 538 before<< "goto " << branchStmt->get_target();528 output << "goto " << branchStmt->get_target(); 539 529 else { 540 530 if ( branchStmt->get_computedTarget() != 0 ) { 541 before<< "goto *";531 output << "goto *"; 542 532 branchStmt->get_computedTarget()->accept( *this ); 543 533 } // if … … 545 535 break; 546 536 case BranchStmt::Break: 547 before<< "break";537 output << "break"; 548 538 break; 549 539 case BranchStmt::Continue: 550 before<< "continue";540 output << "continue"; 551 541 break; 552 542 } 553 before<< ";";554 } 555 556 557 void CodeGenerator 2::visit( ReturnStmt *returnStmt ) {558 before<< "return ";543 output << ";"; 544 } 545 546 547 void CodeGenerator::visit( ReturnStmt *returnStmt ) { 548 output << "return "; 559 549 560 550 // xxx -- check for null expression; … … 562 552 returnStmt->get_expr()->accept( *this ); 563 553 } // if 564 after +=";";565 } 566 567 void CodeGenerator 2::visit( WhileStmt *whileStmt ) {554 output << ";"; 555 } 556 557 void CodeGenerator::visit( WhileStmt *whileStmt ) { 568 558 if ( whileStmt->get_isDoWhile() ) 569 before<< "do" ;559 output << "do" ; 570 560 else { 571 before<< "while (" ;561 output << "while (" ; 572 562 whileStmt->get_condition()->accept(*this ); 573 after +=")";574 } // if 575 after += "{\n";576 shift_left(); 577 563 output << ")"; 564 } // if 565 output << " "; 566 567 output << CodeGenerator::printLabels( whileStmt->get_body()->get_labels() ); 578 568 whileStmt->get_body()->accept( *this ); 579 569 580 before << /* "\r" << */ string( cur_indent, ' ' ) << "}";570 output << /* "\r" << */ string( cur_indent, ' ' ); 581 571 582 572 if ( whileStmt->get_isDoWhile() ) { 583 before<< " while (" ;573 output << " while (" ; 584 574 whileStmt->get_condition()->accept(*this ); 585 after += ");"; 586 } // if 587 588 after += "\n"; 589 } 590 591 void CodeGenerator2::visit( ForStmt *forStmt ) { 592 before << "for ("; 575 output << ");"; 576 } // if 577 } 578 579 void CodeGenerator::visit( ForStmt *forStmt ) { 580 output << "for ("; 593 581 594 582 if ( forStmt->get_initialization() != 0 ) 595 583 forStmt->get_initialization()->accept( *this ); 596 584 else 597 before << ";"; 598 shift_left(); 599 585 output << ";"; 586 600 587 if ( forStmt->get_condition() != 0 ) 601 588 forStmt->get_condition()->accept( *this ); 602 shift_left(); before<< ";";589 output << ";"; 603 590 604 591 if ( forStmt->get_increment() != 0 ) 605 592 forStmt->get_increment()->accept( *this ); 606 shift_left(); before << ")" << endl;593 output << ") "; 607 594 608 595 if ( forStmt->get_body() != 0 ) { 609 cur_indent += CodeGenerator2::tabsize; 610 before << string( cur_indent, ' ' ) << CodeGenerator2::printLabels( forStmt->get_body()->get_labels() ); 596 output << CodeGenerator::printLabels( forStmt->get_body()->get_labels() ); 611 597 forStmt->get_body()->accept( *this ); 612 cur_indent -= CodeGenerator2::tabsize; 613 } // if 614 } 615 616 void CodeGenerator2::visit( NullStmt *nullStmt ) { 617 //before << /* "\r" << */ string( cur_indent, ' ' ) << CodeGenerator2::printLabels( nullStmt->get_labels() ); 618 before << "/* null statement */ ;"; 619 } 620 621 void CodeGenerator2::visit( DeclStmt *declStmt ) { 598 } // if 599 } 600 601 void CodeGenerator::visit( NullStmt *nullStmt ) { 602 //output << /* "\r" << */ string( cur_indent, ' ' ) << CodeGenerator::printLabels( nullStmt->get_labels() ); 603 output << "/* null statement */ ;"; 604 } 605 606 void CodeGenerator::visit( DeclStmt *declStmt ) { 622 607 declStmt->get_decl()->accept( *this ); 623 608 624 609 if ( doSemicolon( declStmt->get_decl() ) ) { 625 after += ";"; 626 } // if 627 shift_left(); 628 } 629 630 std::string CodeGenerator2::printLabels( std::list< Label > &l ) { 610 output << ";"; 611 } // if 612 } 613 614 std::string CodeGenerator::printLabels( std::list< Label > &l ) { 631 615 std::string str( "" ); 632 l.unique(); 616 l.unique(); // assumes a sorted list. Why not use set? 633 617 634 618 for ( std::list< Label >::iterator i = l.begin(); i != l.end(); i++ ) … … 638 622 } 639 623 640 void CodeGenerator2::shift_left() { 641 before << after; 642 after = ""; 643 } 644 645 void CodeGenerator2::handleStorageClass( Declaration *decl ) { 624 void CodeGenerator::handleStorageClass( Declaration *decl ) { 646 625 switch ( decl->get_storageClass() ) { 647 626 case Declaration::NoStorageClass: 648 627 break; 649 628 case Declaration::Extern: 650 before<< "extern ";629 output << "extern "; 651 630 break; 652 631 case Declaration::Static: 653 before<< "static ";632 output << "static "; 654 633 break; 655 634 case Declaration::Auto: … … 657 636 break; 658 637 case Declaration::Register: 659 before<< "register ";638 output << "register "; 660 639 break; 661 640 case Declaration::Inline: -
src/CodeGen/CodeGenerator.h
ra61fea9a r9a8930f 5 5 // file "LICENCE" distributed with Cforall. 6 6 // 7 // CodeGenerator 2.h --7 // CodeGenerator.h -- 8 8 // 9 9 // Author : Richard C. Bilson 10 10 // Created On : Mon May 18 07:44:20 2015 11 // Last Modified By : Peter A. Buhr12 // Last Modified On : Mon May 18 23:35:37201513 // Update Count : 211 // Last Modified By : Rob Schluntz 12 // Last Modified On : Tue Jun 02 13:43:29 2015 13 // Update Count : 14 14 14 // 15 15 … … 25 25 26 26 namespace CodeGen { 27 class CodeGenerator 2: public Visitor {27 class CodeGenerator : public Visitor { 28 28 public: 29 29 static int tabsize; 30 30 31 CodeGenerator2( std::ostream &os ); 32 CodeGenerator2( std::ostream &os, std::string, int indent = 0, bool infun = false ); 33 CodeGenerator2( std::ostream &os, char *, int indent = 0, bool infun = false ); 34 35 CodeGenerator2( CodeGenerator2 & ); 31 CodeGenerator( std::ostream &os ); 32 CodeGenerator( std::ostream &os, std::string, int indent = 0, bool infun = false ); 33 CodeGenerator( std::ostream &os, char *, int indent = 0, bool infun = false ); 36 34 37 35 //*** Declaration … … 82 80 virtual void visit( DeclStmt * ); 83 81 84 std::string get_string( void );85 void add_string_left( std::string s ) { before << s; }86 void shift_left();87 82 template< class Iterator > void genCommaList( Iterator begin, Iterator end ); 88 83 private: 89 84 int cur_indent; 90 85 bool insideFunction; 91 std::ostream &before; 92 std::string after; 86 std::ostream &output; 93 87 94 88 static std::string printLabels ( std::list < Label > & ); … … 100 94 101 95 template< class Iterator > 102 void CodeGenerator 2::genCommaList( Iterator begin, Iterator end ) {96 void CodeGenerator::genCommaList( Iterator begin, Iterator end ) { 103 97 if ( begin == end ) return; 104 98 … … 106 100 (*begin++)->accept( *this ); 107 101 if ( begin == end ) return; 108 before<< ", ";102 output << ", "; 109 103 } // for 110 104 } -
src/CodeGen/GenType.cc
ra61fea9a r9a8930f 10 10 // Created On : Mon May 18 07:44:20 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : T ue Jun 2 11:21:32201513 // Update Count : 312 // Last Modified On : Thu Jun 4 14:04:58 2015 13 // Update Count : 4 14 14 // 15 15 … … 97 97 } // if 98 98 if ( dimension != 0 ) { 99 CodeGenerator 2cg( os );99 CodeGenerator cg( os ); 100 100 dimension->accept( cg ); 101 101 } // if … … 148 148 } // if 149 149 } else { 150 CodeGenerator 2cg( os );150 CodeGenerator cg( os ); 151 151 os << "(" ; 152 152 -
src/CodeGen/Generate.cc
ra61fea9a r9a8930f 10 10 // Created On : Mon May 18 07:44:20 2015 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : T ue Jun 2 11:21:06201513 // Update Count : 212 // Last Modified On : Thu Jun 4 14:04:25 2015 13 // Update Count : 5 14 14 // 15 15 … … 27 27 namespace CodeGen { 28 28 void generate( std::list< Declaration* > translationUnit, std::ostream &os, bool doIntrinsics ) { 29 CodeGen::CodeGenerator 2cgv( os );29 CodeGen::CodeGenerator cgv( os ); 30 30 31 31 for ( std::list<Declaration *>::iterator i = translationUnit.begin(); i != translationUnit.end(); i++ ) { 32 32 if ( LinkageSpec::isGeneratable( (*i)->get_linkage() ) && (doIntrinsics || ! LinkageSpec::isBuiltin( (*i)->get_linkage() ) ) ) { 33 33 (*i)->accept(cgv); 34 cgv.shift_left();35 34 if ( doSemicolon( *i ) ) { 36 35 os << ";";
Note:
See TracChangeset
for help on using the changeset viewer.