Changeset f1e012b for src/InitTweak/RemoveInit.cc

Timestamp:

Jan 19, 2016, 1:28:25 PM (9 years ago)

Author:

Rob Schluntz <rschlunt@…>

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, with_gc

Children:

ca1c11f

Parents:

71f4e4f

Message:

added intrinsic ctor/dtors to prelude, modified MakeLibCfa? to build prelude ctor/dtors, added ctor/dtor to polymorphic object type constraints, rudimentary fallback on initializer nodes if chosen ctor is intrinsic, remove intrinsic destructor statements to reduce output pollution

File:

• src/InitTweak/RemoveInit.cc (modified) (7 diffs)

src/InitTweak/RemoveInit.cc

@@ -10 +10 @@
 // Created On       : Mon May 18 07:44:20 2015
 // Last Modified By : Rob Schluntz
-// Last Modified On : Wed Jan 13 15:19:35 2016
-// Update Count     : 154
+// Last Modified On : Tue Jan 19 11:12:49 2016
+// Update Count     : 165
 //
 
@@ -59 +59 @@
                 static void generateCtorDtor( std::list< Declaration * > &translationUnit );
 
+                CtorDtor() : inFunction( false ) {}
+
                 virtual ObjectDecl * mutate( ObjectDecl * );
                 virtual DeclarationWithType * mutate( FunctionDecl *functionDecl );
@@ -71 +73 @@
 
           protected:
+                bool inFunction;
 
                 // to be added before block ends - use push_front so order is correct
@@ -93 +96 @@
                 if (objDecl->get_init() && dynamic_cast<TypeInstType*>(objDecl->get_type())) {
                         if (SingleInit * single = dynamic_cast<SingleInit*>(objDecl->get_init())) {
-                                UntypedExpr *assign = new UntypedExpr( new NameExpr( "?=?" ) );
+                                // xxx this can be more complicated - consider ListInit
+                                UntypedExpr *assign = new UntypedExpr( new NameExpr( "?{}" ) );
                                 assign->get_args().push_back( new AddressExpr (new NameExpr( objDecl->get_name() ) ) );
                                 assign->get_args().push_back( single->get_value()->clone() );
@@ -107 +111 @@
                 // hands off if the function returns an lvalue - we don't want to allocate a temporary if a variable's address
                 // is being returned
+                // xxx - this should construct rather than assign
                 if ( returnStmt->get_expr() && returnVals.size() == 1 && funcName != "?=?" && ! returnVals.front()->get_type()->get_isLvalue()  ) {
                         ObjectDecl *newObj = new ObjectDecl( tempNamer.newName(), DeclarationNode::NoStorageClass, LinkageSpec::C, 0, returnVals.front()->get_type()->clone(), 0 );
@@ -186 +191 @@
                 // hands off if designated or if @=
                 if ( tryConstruct( objDecl ) ) {
-                        Expression * ctor = makeCtorDtorExpr( "?{}", objDecl, makeInitList( objDecl->get_init() ) );
-                        Expression * dtor = makeCtorDtorExpr( "^?{}", objDecl, std::list< Expression * >() );
-
-                        // need to remember init expression, in case no ctors exist
-                        // if ctor does exist, want to use ctor expression instead of init
-                        // push this decision to the resolver
-                        objDecl->set_init( new ConstructorInit( ctor, objDecl->get_init() ) );
-                        destructorStmts.push_front( new ExprStmt( noLabels, dtor ) );
+                        if ( inFunction ) {
+                                Expression * ctor = makeCtorDtorExpr( "?{}", objDecl, makeInitList( objDecl->get_init() ) );
+                                Expression * dtor = makeCtorDtorExpr( "^?{}", objDecl, std::list< Expression * >() );
+
+                                // need to remember init expression, in case no ctors exist
+                                // if ctor does exist, want to use ctor expression instead of init
+                                // push this decision to the resolver
+                                objDecl->set_init( new ConstructorInit( ctor, objDecl->get_init() ) );
+                                destructorStmts.push_front( new ExprStmt( noLabels, dtor ) );
+                        } else {
+                                // xxx - find a way to construct/destruct globals
+                                // hack: implicit "static" initialization routine for each struct type? or something similar?
+                                // --ties into module system
+                        }
                 }
                 return objDecl;
@@ -200 +211 @@
         DeclarationWithType * CtorDtor::mutate( FunctionDecl *functionDecl ) {
                 // parameters should not be constructed and destructed, so don't mutate FunctionType
+                bool oldInFunc = inFunction;
                 mutateAll( functionDecl->get_oldDecls(), *this );
+                inFunction = true;
                 functionDecl->set_statements( maybeMutate( functionDecl->get_statements(), *this ) );
+                inFunction = oldInFunc;
                 return functionDecl;
         }