Changes in src/main.cc [ca1c11f:faf8857]

File:

• src/main.cc (modified) (11 diffs)

src/main.cc

@@ -5 +5 @@
 // file "LICENCE" distributed with Cforall.
 //
-// main.cc --
+// main.cc -- 
 //
 // Author           : Richard C. Bilson
 // Created On       : Fri May 15 23:12:02 2015
-// Last Modified By : Rob Schluntz
-// Last Modified On : Tue Jan 19 16:28:13 2016
-// Update Count     : 194
+// Last Modified By : Peter A. Buhr
+// Last Modified On : Thu Dec 17 12:59:06 2015
+// Update Count     : 179
 //
 
@@ -42 +42 @@
 #include "InitTweak/Mutate.h"
 #include "InitTweak/RemoveInit.h"
-#include "InitTweak/FixInit.h"
 //#include "Explain/GenProlog.h"
 //#include "Try/Visit.h"
@@ -62 +61 @@
         astp = false,
         bresolvep = false,
-        ctorinitp = false,
         exprp = false,
         expraltp = false,
@@ -76 +74 @@
         codegenp = false;
 
-enum { Ast, Bresolver, CtorInitFix, Expr, ExprAlt, Grammar, LibCFA, Nopreamble, Parse, Prototypes, Resolver, Symbol, Validate, };
+enum { Ast, Bresolver, Expr, ExprAlt, Grammar, LibCFA, Nopreamble, Parse, Prototypes, Resolver, Symbol, Validate, };
 
 static struct option long_opts[] = {
         { "ast", no_argument, 0, Ast },
         { "before-resolver", no_argument, 0, Bresolver },
-        { "ctorinitfix", no_argument, 0, CtorInitFix },
         { "expr", no_argument, 0, Expr },
         { "expralt", no_argument, 0, ExprAlt },
@@ -102 +99 @@
 
         opterr = 0;                                                                                     // prevent getopt from printing error messages
-
+        
         int c;
-        while ( (c = getopt_long( argc, argv, "abcefFglnpqrsvyzD:", long_opts, &long_index )) != -1 ) {
+        while ( (c = getopt_long( argc, argv, "abefglnpqrsvyzD:", long_opts, &long_index )) != -1 ) {
                 switch ( c ) {
                   case Ast:
@@ -113 +110 @@
                   case 'b':                                                                             // print before resolver steps
                         bresolvep = true;
-                        break;
-                        case CtorInitFix:
-                        case 'c':
-                        ctorinitp = true;
                         break;
                   case Expr:
@@ -189 +182 @@
                         output = new ofstream( argv[ optind ] );
                 } // if
-
+        
                 Parser::get_parser().set_debug( grammarp );
 
@@ -210 +203 @@
                                         exit( 1 );
                                 } // if
-
+                    
                                 parse( prelude, LinkageSpec::Intrinsic );
                         } // if
                 } // if
 
-                parse( input, libcfap ? LinkageSpec::Intrinsic : LinkageSpec::Cforall, grammarp );
-
+                parse( input, libcfap ? LinkageSpec::Intrinsic : LinkageSpec::Cforall, grammarp );      
+  
                 if ( parsep ) {
                         Parser::get_parser().get_parseTree()->printList( std::cout );
@@ -251 +244 @@
                 OPTPRINT( "mutate" )
                 ControlStruct::mutate( translationUnit );
-                OPTPRINT( "fixNames" )
+                OPTPRINT( "fixNames" ) 
                 CodeGen::fixNames( translationUnit );
-                OPTPRINT( "tweakInit" )
+                OPTPRINT( "tweak" )
                 InitTweak::tweak( translationUnit );
 
@@ -270 +263 @@
                 if ( exprp ) {
                         dump( translationUnit );
-                        return 0;
-                }
-
-                OPTPRINT( "fixInit" )
-                // fix ObjectDecl - replaces ConstructorInit nodes
-                InitTweak::fix( translationUnit );
-                if ( ctorinitp ) {
-                        dump ( translationUnit );
-                        return 0;
                 }
 
@@ -347 +331 @@
         std::list< Declaration * > decls;
         if ( noprotop ) {
-                filter( translationUnit.begin(), translationUnit.end(),
+                filter( translationUnit.begin(), translationUnit.end(), 
                                 std::back_inserter( decls ), notPrelude );
         } else {