Changes in / [381bea6:b7c89aa]


Ignore:
Files:
12 deleted
4 edited

Legend:

Unmodified
Added
Removed
  • .gitignore

    r381bea6 rb7c89aa  
    5656src/Parser/parser.h
    5757src/Parser/parser.hh
    58 src/demangler
    5958
    6059tools/prettyprinter/parser.output
  • driver/as.cc

    r381bea6 rb7c89aa  
    1010// Created On       : Wed Aug  1 10:49:42 2018
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Wed Aug 22 17:30:24 2018
    13 // Update Count     : 93
     12// Last Modified On : Thu Aug  2 17:50:09 2018
     13// Update Count     : 90
    1414//
    1515
     
    2323
    2424//#define __DEBUG_H__
    25 
    26 #ifdef __DEBUG_H__
    27 #include <iostream>
    28 using namespace std;
    29 #endif // __DEBUG_H__
    3025
    3126int main( const int argc, const char * argv[] ) {
  • driver/cc1.cc

    r381bea6 rb7c89aa  
    1010// Created On       : Fri Aug 26 14:23:51 2005
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Thu Aug 23 09:48:40 2018
    13 // Update Count     : 122
     12// Last Modified On : Thu Jul 19 10:46:11 2018
     13// Update Count     : 111
    1414//
    1515
     
    4747const string suffixes[NumSuffixes] = { "cfa", "hfa", };
    4848
    49 
    50 void suffix( string arg, const char * args[], int & nargs ) {
     49bool suffix( string arg ) {
    5150        //std::cerr << arg << std::endl;
    5251        size_t dot = arg.find_last_of( "." );
    5352        //std::cerr << dot << " " << (dot != string::npos ? arg.substr( dot + 1 ) : "fred" ) << std::endl;
    54         if ( dot == string::npos ) return;
     53        if ( dot == string::npos ) return false;
    5554        string sx = arg.substr( dot + 1 );
    5655        for ( int i = 0; i < NumSuffixes; i += 1 ) {
    57                 if ( sx == suffixes[i] ) {
    58                         args[nargs] = "-x";
    59                         nargs += 1;
    60                         args[nargs] = "c";
    61                         nargs += 1;
    62                         return;
    63                 } // if
    64         } // for
     56                if ( sx == suffixes[i] ) return true;
     57        } // for
     58        return false;
    6559} // suffix
    6660
    6761
    68 void checkEnv( const char * args[], int & nargs ) {
     62void checkEnv( const char *args[], int &nargs ) {
    6963        char *value;
    7064
    71         value = getenv( "__CFA_COMPILER__" );
     65        value = getenv( "__COMPILER__" );
    7266        if ( value != NULL ) {
    7367                compiler_name = value;
     
    269263
    270264                args[0] = compiler_name.c_str();
    271                 suffix( cpp_in, args, nargs );                                  // check suffix
    272265                args[nargs] = cpp_in;
    273266                nargs += 1;
     
    317310
    318311                args[0] = compiler_name.c_str();
    319                 suffix( cpp_in, args, nargs );                                  // check suffix
     312                if ( suffix( cpp_in ) ) {
     313                        args[nargs] = "-x";
     314                        nargs += 1;
     315                        args[nargs] = "c";
     316                        nargs += 1;
     317                } // if
    320318                args[nargs] = cpp_in;                                                   // input to cpp
    321319                nargs += 1;
     
    356354
    357355        if ( fork() == 0 ) {                                                            // child runs CFA
    358                 cargs[0] = ( *new string( bprefix + "cfa-cpp" ) ).c_str();
     356                cargs[0] = ( *new string( bprefix + "/cfa-cpp" ) ).c_str();
    359357
    360358                // Source file-name used to generate routine names containing global initializations for TU.
  • driver/cfa.cc

    r381bea6 rb7c89aa  
    1010// Created On       : Tue Aug 20 13:44:49 2002
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Thu Aug 23 15:41:55 2018
    13 // Update Count     : 270
     12// Last Modified On : Fri Aug 10 18:17:58 2018
     13// Update Count     : 259
    1414//
    1515
     
    4343const string suffixes[NumSuffixes] = { "cfa", "hfa", };
    4444
    45 void suffix( string arg, const char * args[], int & nargs ) {
     45bool suffix( string arg ) {
    4646        //std::cerr << arg << std::endl;
    4747        size_t dot = arg.find_last_of( "." );
    4848        //std::cerr << dot << " " << (dot != string::npos ? arg.substr( dot + 1 ) : "fred" ) << std::endl;
    49         if ( dot == string::npos ) return;
     49        if ( dot == string::npos ) return false;
    5050        string sx = arg.substr( dot + 1 );
    5151        for ( int i = 0; i < NumSuffixes; i += 1 ) {
    52                 if ( sx == suffixes[i] ) {
    53                         args[nargs] = "-x";
    54                         nargs += 1;
    55                         args[nargs] = "c";
    56                         nargs += 1;
    57                         return;
    58                 } // if
     52                if ( sx == suffixes[i] ) return true;
    5953        } // for
     54        return false;
    6055} // suffix
    6156
     
    9186        string Major( str( CFA_VERSION_MAJOR ) ), Minor( str( CFA_VERSION_MINOR ) ), Patch( str( CFA_VERSION_PATCH ) );
    9287
    93         string installincdir( CFA_INCDIR );                                     // fixed location of include files
    94         string installlibdir( CFA_LIBDIR );                                     // fixed location of cc1 and cfa-cpp commands when installed
    95         string srcdriverdir ( TOP_BUILDDIR "driver");           // fixed location of cc1 and cfa-cpp commands when in tree
     88        string installincdir( CFA_INCDIR );                         // fixed location of include files
     89        string installlibdir( CFA_LIBDIR );                         // fixed location of cc1 and cfa-cpp commands when installed
     90        string srcdriverdir ( TOP_BUILDDIR "driver");                // fixed location of cc1 and cfa-cpp commands when in tree
    9691
    9792        string heading;                                                                         // banner printed at start of cfa compilation
     
    183178                                if ( i == argc ) continue;                              // next argument available ?
    184179                                compiler_path = argv[i];
    185                                 if ( putenv( (char *)( *new string( string( "__CFA_COMPILER__=" ) + argv[i]) ).c_str() ) != 0 ) {
     180                                if ( putenv( (char *)( *new string( string( "__U_COMPILER__=" ) + argv[i]) ).c_str() ) != 0 ) {
    186181                                        cerr << argv[0] << " error, cannot set environment variable." << endl;
    187182                                        exit( EXIT_FAILURE );
     
    299294                } else {
    300295                        bool opt = false;
    301                         if ( ! xflag ) {
    302                                 suffix( arg, args, nargs );                             // check suffix
     296                        if ( ! xflag && suffix( arg ) ) {
     297                                args[nargs] = "-x";
     298                                nargs += 1;
     299                                args[nargs] = "c";
     300                                nargs += 1;
    303301                                // args[nargs] = ( *new string( string("-D__GCC_X__=c") ) ).c_str(); // add the argument for -x
    304302                                // nargs += 1;
     
    343341                args[nargs] = "-I" CFA_INCDIR;
    344342                nargs += 1;
    345                 if ( ! noincstd_flag ) {                                                // do not use during build
    346                         args[nargs] = "-I" CFA_INCDIR "stdhdr";
     343                if ( ! noincstd_flag ) {                                                        // do not use during build
     344                        args[nargs] = "-I" CFA_INCDIR "/stdhdr";
    347345                        nargs += 1;
    348346                } // if
    349                 args[nargs] = "-I" CFA_INCDIR "concurrency";
    350                 nargs += 1;
    351                 args[nargs] = "-I" CFA_INCDIR "containers";
     347                args[nargs] = "-I" CFA_INCDIR "/concurrency";
     348                nargs += 1;
     349                args[nargs] = "-I" CFA_INCDIR "/containers";
    352350                nargs += 1;
    353351        } else {
    354352                args[nargs] = "-I" TOP_SRCDIR "libcfa/src";
    355353                nargs += 1;
    356                 if ( ! noincstd_flag ) {                                                // do not use during build
     354                if ( ! noincstd_flag ) {                                                        // do not use during build
    357355                        args[nargs] = "-I" TOP_SRCDIR "libcfa/src" "/stdhdr";
    358356                        nargs += 1;
     
    379377        }
    380378
    381         string arch = m32 ? CFA_32_CPU : (m64 ? CFA_64_CPU : CFA_DEFAULT_CPU);
    382         if ( ! m32 && ! m64 && arch == "x86" ) {                        // no override and 32-bit architecture
    383                 args[nargs] = "-m32";
    384                 nargs += 1;
    385         } // if
     379        const char * const arch = m32 ? CFA_32_CPU : (m64 ? CFA_64_CPU : CFA_DEFAULT_CPU);
    386380        const char * config = debug ? "debug": "nodebug";
    387381        string libdir = libbase + arch + "-" + config;
    388 
    389         if ( ! dirExists( libdir ) ) {
     382        if( !dirExists(libdir) ) {
    390383                cerr << argv[0] << " internal error, configuration " << config << " not installed." << endl;
    391384                cerr << "Was looking for " << libdir << endl;
    392385                libdir = libbase + arch + "-" + "nolib";
    393         } // if
    394 
    395         if ( ! dirExists( libdir ) ) {
     386        }
     387
     388        if( !dirExists(libdir) ) {
    396389                cerr << argv[0] << " internal error, cannot find prelude directory." << endl;
    397390                cerr << "Was looking for " << libdir << endl;
    398391                exit( EXIT_FAILURE );
    399         } // if
     392        }
    400393
    401394        args[nargs] = ( *new string( string("-D__CFA_FLAG__=--prelude-dir=" ) + libdir + (intree ? "/prelude" : "")) ).c_str();
     
    477470
    478471        if ( Bprefix.length() == 0 ) {
    479                 Bprefix = ! intree ? installlibdir : srcdriverdir;
    480                 if ( Bprefix[Bprefix.length() - 1] != '/' ) Bprefix += '/';
     472                Bprefix = !intree ? installlibdir : srcdriverdir;
    481473                args[nargs] = ( *new string( string("-D__GCC_BPREFIX__=") + Bprefix ) ).c_str();
    482474                nargs += 1;
     
    512504                args[nargs] = "-D__int8_t_defined";                             // prevent gcc type-size attributes
    513505                nargs += 1;
    514                 args[nargs] = ( *new string( string("-B") + Bprefix ) ).c_str();
     506                args[nargs] = ( *new string( string("-B") + Bprefix + "/" ) ).c_str();
    515507                nargs += 1;
    516508                args[nargs] = "-lm";
Note: See TracChangeset for help on using the changeset viewer.