| [51587aa] | 1 | // | 
|---|
|  | 2 | // Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo | 
|---|
|  | 3 | // | 
|---|
|  | 4 | // The contents of this file are covered under the licence agreement in the | 
|---|
|  | 5 | // file "LICENCE" distributed with Cforall. | 
|---|
|  | 6 | // | 
|---|
| [35b1bf4] | 7 | // Generate.cc -- | 
|---|
| [51587aa] | 8 | // | 
|---|
|  | 9 | // Author           : Richard C. Bilson | 
|---|
|  | 10 | // Created On       : Mon May 18 07:44:20 2015 | 
|---|
| [07de76b] | 11 | // Last Modified By : Peter A. Buhr | 
|---|
| [60a8062] | 12 | // Last Modified On : Sun Feb 16 03:01:51 2020 | 
|---|
|  | 13 | // Update Count     : 9 | 
|---|
| [51587aa] | 14 | // | 
|---|
| [3268a58] | 15 | #include "Generate.h" | 
|---|
| [51587aa] | 16 |  | 
|---|
| [bf2438c] | 17 | #include <iostream>                  // for ostream, endl, operator<< | 
|---|
|  | 18 | #include <list>                      // for list | 
|---|
|  | 19 | #include <string>                    // for operator<< | 
|---|
| [51b73452] | 20 |  | 
|---|
| [bf2438c] | 21 | #include "CodeGenerator.h"           // for CodeGenerator, doSemicolon, oper... | 
|---|
|  | 22 | #include "GenType.h"                 // for genPrettyType | 
|---|
| [a984e65] | 23 | #include "Common/PassVisitor.h"      // for PassVisitor | 
|---|
| [07de76b] | 24 | #include "SynTree/LinkageSpec.h"     // for isBuiltin, isGeneratable | 
|---|
| [bf2438c] | 25 | #include "SynTree/BaseSyntaxNode.h"  // for BaseSyntaxNode | 
|---|
|  | 26 | #include "SynTree/Declaration.h"     // for Declaration | 
|---|
|  | 27 | #include "SynTree/Type.h"            // for Type | 
|---|
| [51b73452] | 28 |  | 
|---|
|  | 29 | using namespace std; | 
|---|
|  | 30 |  | 
|---|
|  | 31 | namespace CodeGen { | 
|---|
| [a984e65] | 32 | namespace { | 
|---|
|  | 33 | /// Removes misc. nodes that should not exist in CodeGen | 
|---|
|  | 34 | struct TreeCleaner { | 
|---|
| [acdfb45] | 35 | void premutate( CompoundStmt * stmt ); | 
|---|
|  | 36 | Statement * postmutate( ImplicitCtorDtorStmt * stmt ); | 
|---|
| [a984e65] | 37 |  | 
|---|
|  | 38 | static bool shouldClean( Declaration * ); | 
|---|
|  | 39 | }; | 
|---|
|  | 40 |  | 
|---|
|  | 41 | void cleanTree( std::list< Declaration * > & translationUnit ) { | 
|---|
|  | 42 | PassVisitor<TreeCleaner> cleaner; | 
|---|
|  | 43 | filter( translationUnit, [](Declaration * decl) { return TreeCleaner::shouldClean(decl); }, false ); | 
|---|
| [acdfb45] | 44 | mutateAll( translationUnit, cleaner ); | 
|---|
| [a984e65] | 45 | } // cleanTree | 
|---|
|  | 46 | } // namespace | 
|---|
|  | 47 |  | 
|---|
| [5f08961d] | 48 | void generate( std::list< Declaration* > translationUnit, std::ostream &os, bool doIntrinsics, bool pretty, bool generateC, bool lineMarks, bool printExprTypes ) { | 
|---|
| [a984e65] | 49 | cleanTree( translationUnit ); | 
|---|
|  | 50 |  | 
|---|
| [5f08961d] | 51 | PassVisitor<CodeGenerator> cgv( os, pretty, generateC, lineMarks, printExprTypes ); | 
|---|
| [e6512c8] | 52 | for ( auto & dcl : translationUnit ) { | 
|---|
|  | 53 | if ( LinkageSpec::isGeneratable( dcl->get_linkage() ) && (doIntrinsics || ! LinkageSpec::isBuiltin( dcl->get_linkage() ) ) ) { | 
|---|
| [9857e8d] | 54 | cgv.pass.updateLocation( dcl ); | 
|---|
| [e6512c8] | 55 | dcl->accept(cgv); | 
|---|
|  | 56 | if ( doSemicolon( dcl ) ) { | 
|---|
| [51587aa] | 57 | os << ";"; | 
|---|
|  | 58 | } // if | 
|---|
| [d22e90f] | 59 | os << cgv.pass.endl; | 
|---|
| [51587aa] | 60 | } // if | 
|---|
|  | 61 | } // for | 
|---|
|  | 62 | } | 
|---|
| [262f085f] | 63 |  | 
|---|
|  | 64 | void generate( BaseSyntaxNode * node, std::ostream & os ) { | 
|---|
|  | 65 | if ( Type * type = dynamic_cast< Type * >( node ) ) { | 
|---|
| [60a8062] | 66 | os << genPrettyType( type, "" ); | 
|---|
| [262f085f] | 67 | } else { | 
|---|
| [5f08961d] | 68 | PassVisitor<CodeGenerator> cgv( os, true, false, false, false ); | 
|---|
| [262f085f] | 69 | node->accept( cgv ); | 
|---|
|  | 70 | } | 
|---|
|  | 71 | os << std::endl; | 
|---|
|  | 72 | } | 
|---|
| [a984e65] | 73 |  | 
|---|
|  | 74 | namespace { | 
|---|
| [acdfb45] | 75 | void TreeCleaner::premutate( CompoundStmt * cstmt ) { | 
|---|
| [a984e65] | 76 | filter( cstmt->kids, [](Statement * stmt) { | 
|---|
|  | 77 | if ( DeclStmt * declStmt = dynamic_cast< DeclStmt * >( stmt ) ) { | 
|---|
|  | 78 | return shouldClean( declStmt->decl ); | 
|---|
|  | 79 | } | 
|---|
|  | 80 | return false; | 
|---|
|  | 81 | }, false ); | 
|---|
|  | 82 | } | 
|---|
|  | 83 |  | 
|---|
| [acdfb45] | 84 | Statement * TreeCleaner::postmutate( ImplicitCtorDtorStmt * stmt ) { | 
|---|
|  | 85 | Statement * callStmt = nullptr; | 
|---|
|  | 86 | std::swap( stmt->callStmt, callStmt ); | 
|---|
|  | 87 | delete stmt; | 
|---|
|  | 88 | return callStmt; | 
|---|
|  | 89 | } | 
|---|
|  | 90 |  | 
|---|
| [a984e65] | 91 | bool TreeCleaner::shouldClean( Declaration * decl ) { | 
|---|
|  | 92 | return dynamic_cast< TraitDecl * >( decl ); | 
|---|
|  | 93 | } | 
|---|
|  | 94 | } // namespace | 
|---|
| [51b73452] | 95 | } // namespace CodeGen | 
|---|
| [51587aa] | 96 |  | 
|---|
|  | 97 | // Local Variables: // | 
|---|
|  | 98 | // tab-width: 4 // | 
|---|
|  | 99 | // mode: c++ // | 
|---|
|  | 100 | // compile-command: "make install" // | 
|---|
|  | 101 | // End: // | 
|---|