Changes in driver/cfa.cc [4f5a8a2:aced69a]
- File:
-
- 1 edited
-
driver/cfa.cc (modified) (19 diffs)
Legend:
- Unmodified
- Added
- Removed
-
driver/cfa.cc
r4f5a8a2 raced69a 10 10 // Created On : Tue Aug 20 13:44:49 2002 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Sat Aug 10 08:44:15 201913 // Update Count : 31112 // Last Modified On : Tue Sep 10 17:00:15 2019 13 // Update Count : 420 14 14 // 15 15 … … 28 28 #include "config.h" // configure info 29 29 30 31 30 using std::cerr; 32 31 using std::endl; … … 34 33 using std::to_string; 35 34 36 37 35 //#define __DEBUG_H__ 38 36 39 37 40 bool prefix( string arg, string pre ) { 38 static string __CFA_FLAGPREFIX__( "__CFA_FLAG" ); // "N__=" suffix 39 40 void Putenv( char * argv[], string arg ) { 41 static int flags = 0; // environment variables must have unique names 42 43 if ( putenv( (char *)( *new string( string( __CFA_FLAGPREFIX__ + to_string( flags++ ) + "__=" ) + arg ) ).c_str() ) ) { 44 cerr << argv[0] << " error, cannot set environment variable." << endl; 45 exit( EXIT_FAILURE ); 46 } // if 47 } // Putenv 48 49 50 bool prefix( const string & arg, const string & pre ) { // check if string has prefix 41 51 return arg.substr( 0, pre.size() ) == pre; 42 52 } // prefix 43 53 44 bool suffix( string arg ) {54 bool suffix( const string & arg ) { // check if string has suffix 45 55 enum { NumSuffixes = 3 }; 46 56 static const string suffixes[NumSuffixes] = { "cfa", "hfa", "ifa" }; 47 //std::cerr << arg << std::endl; 57 48 58 size_t dot = arg.find_last_of( "." ); 49 //std::cerr << dot << " " << (dot != string::npos ? arg.substr( dot + 1 ) : "fred" ) << std::endl;50 59 if ( dot == string::npos ) return false; 51 60 const string * end = suffixes + NumSuffixes; … … 54 63 55 64 56 void shuffle( const char * args[], int S, int E, int N ) { 57 // S & E index 1 passed the end so adjust with -1 58 #ifdef __DEBUG_H__ 59 cerr << "shuffle:" << S << " " << E << " " << N << endl; 60 #endif // __DEBUG_H__ 61 for ( int j = E-1 + N; j > S-1 + N; j -=1 ) { 62 #ifdef __DEBUG_H__ 63 cerr << "\t" << j << " " << j-N << endl; 64 #endif // __DEBUG_H__ 65 args[j] = args[j-N]; 66 } // for 67 } // shuffle 68 69 static inline bool dirExists( const string & path ) { 65 static inline bool dirExists( const string & path ) { // check if directory exists 70 66 struct stat info; 71 if(stat( path.c_str(), &info ) != 0) 72 return false; 73 else if(info.st_mode & S_IFDIR) 74 return true; 75 else 76 return false; 77 } //dirExists 78 79 67 if ( stat( path.c_str(), &info ) != 0 ) return false; 68 return (info.st_mode & S_IFDIR) != 0; 69 } // dirExists 70 71 72 #define xstr(s) str(s) 80 73 #define str(s) #s 81 74 82 75 int main( int argc, char * argv[] ) { 83 76 string Version( CFA_VERSION_LONG ); // current version number from CONFIG 84 string Major( str( CFA_VERSION_MAJOR ) ), Minor( str( CFA_VERSION_MINOR ) ), Patch(str( CFA_VERSION_PATCH ) );77 string Major( xstr( CFA_VERSION_MAJOR ) ), Minor( xstr( CFA_VERSION_MINOR ) ), Patch( xstr( CFA_VERSION_PATCH ) ); 85 78 86 79 string installincdir( CFA_INCDIR ); // fixed location of include files … … 90 83 string heading; // banner printed at start of cfa compilation 91 84 string arg; // current command-line argument during command-line parsing 92 string Bprefix; // path where gcc looks for compiler commandsteps85 string bprefix; // path where gcc looks for compiler steps 93 86 string langstd; // language standard 94 87 … … 97 90 98 91 bool x_flag = false; // -x flag 99 bool nonoptarg = false; // indicates non-option argument specified100 bool link = true; // link ing as well as compiling92 bool nonoptarg = false; // no non-option arguments specified, i.e., no file names 93 bool link = true; // link stage occurring 101 94 bool verbose = false; // -v flag 102 95 bool quiet = false; // -quiet flag … … 111 104 bool m32 = false; // -m32 flag 112 105 bool m64 = false; // -m64 flag 113 bool intree = false; 106 bool intree = false; // build in tree 107 int o_file = 0; // -o filename position 114 108 115 109 const char *args[argc + 100]; // cfa command line values, plus some space for additional flags … … 135 129 136 130 if ( arg == "-Xlinker" || arg == "-o" ) { 137 args[nargs] = argv[i]; // pass the argument along 138 nargs += 1; 131 args[nargs++] = argv[i]; // pass argument along 139 132 i += 1; 140 133 if ( i == argc ) continue; // next argument available ? 141 args[nargs ] = argv[i]; // pass theargument along142 nargs += 1;134 args[nargs++] = argv[i]; // pass argument along 135 if ( arg == "-o" ) o_file = i; // remember file 143 136 } else if ( arg == "-XCFA" ) { // CFA pass through 144 137 i += 1; 145 args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + argv[i] ) ).c_str(); 146 nargs += 1; 138 Putenv( argv, argv[i] ); 147 139 148 140 // CFA specific arguments … … 151 143 CFA_flag = true; // strip the -CFA flag 152 144 link = false; 153 args[nargs] = "-E"; // replace the argument with -E 154 nargs += 1; 145 args[nargs++] = "-fsyntax-only"; // stop after stage 2 155 146 } else if ( arg == "-debug" ) { 156 147 debug = true; // strip the debug flag 157 148 } else if ( arg == "-nodebug" ) { 158 debug = false; // strip the debug flag149 debug = false; // strip the nodebug flag 159 150 } else if ( arg == "-nolib" ) { 160 151 nolib = true; // strip the nodebug flag … … 176 167 if ( i == argc ) continue; // next argument available ? 177 168 compiler_path = argv[i]; 178 if ( putenv( (char *)( *new string( string( "__CFA_COMPILER__=" ) + argv[i]) ).c_str() ) != 0 ) { 179 cerr << argv[0] << " error, cannot set environment variable." << endl; 180 exit( EXIT_FAILURE ); 181 } // if 169 Putenv( argv, arg + "=" + argv[i] ); 182 170 183 171 // C specific arguments … … 185 173 } else if ( arg == "-v" ) { 186 174 verbose = true; // verbosity required 187 args[nargs] = argv[i]; // pass the argument along 188 nargs += 1; 175 args[nargs++] = argv[i]; // pass argument along 189 176 } else if ( arg == "-g" ) { 190 177 debugging = true; // symbolic debugging required 191 args[nargs] = argv[i]; // pass the argument along 192 nargs += 1; 178 args[nargs++] = argv[i]; // pass argument along 179 } else if ( arg == "-save-temps" ) { 180 args[nargs++] = argv[i]; // pass argument along 181 Putenv( argv, arg ); // save cfa-cpp output 193 182 } else if ( prefix( arg, "-x" ) ) { // file suffix ? 194 183 string lang; 195 args[nargs] = argv[i]; // pass the argument along 196 nargs += 1; 184 args[nargs++] = argv[i]; // pass argument along 197 185 if ( arg.length() == 2 ) { // separate argument ? 198 186 i += 1; 199 187 if ( i == argc ) continue; // next argument available ? 200 188 lang = argv[i]; 201 args[nargs] = argv[i]; // pass the argument along 202 nargs += 1; 189 args[nargs++] = argv[i]; // pass argument along 203 190 } else { 204 191 lang = arg.substr( 2 ); … … 207 194 } else if ( prefix( arg, "-std=" ) || prefix( arg, "--std=" ) ) { 208 195 std_flag = true; // -std=XX provided 209 args[nargs] = argv[i]; // pass the argument along 210 nargs += 1; 196 args[nargs++] = argv[i]; // pass argument along 211 197 } else if ( arg == "-w" ) { 212 args[nargs] = argv[i]; // pass the argument along 213 nargs += 1; 214 args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + arg ) ).c_str(); // add the argument for cfa-cpp 215 nargs += 1; 198 args[nargs++] = argv[i]; // pass argument along 199 Putenv( argv, arg ); 216 200 } else if ( prefix( arg, "-W" ) ) { // check before next tests 217 201 if ( arg == "-Werror" || arg == "-Wall" ) { 218 args[nargs] = argv[i]; // pass the argument along 219 nargs += 1; 220 args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + arg ) ).c_str(); // add the argument for cfa-cpp 221 nargs += 1; 202 args[nargs++] = argv[i]; // pass argument along 203 Putenv( argv, argv[i] ); 222 204 } else { 223 205 unsigned int adv = prefix( arg, "-Wno-" ) ? 5 : 2; 224 args[nargs] = argv[i]; // conditionally pass theargument along225 const char * warning = argv[i] + adv; 206 args[nargs] = argv[i]; // conditionally pass argument along 207 const char * warning = argv[i] + adv; // extract warning 226 208 if ( SemanticWarning_Exist( warning ) ) { // replace the argument for cfa-cpp 227 args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + arg ) ).c_str();209 Putenv( argv, arg ); 228 210 } // if 229 211 nargs += 1; 230 212 } // if 231 213 } else if ( prefix( arg, "-B" ) ) { 232 Bprefix = arg.substr(2); // strip the -B flag 233 args[nargs] = ( *new string( string("-D__GCC_BPREFIX__=") + Bprefix ) ).c_str(); 234 nargs += 1; 235 } else if ( prefix( arg, "-b" ) ) { 236 if ( arg.length() == 2 ) { // separate argument ? 237 i += 1; 238 if ( i == argc ) continue; // next argument available ? 239 arg += argv[i]; // concatenate argument 240 } // if 241 // later versions of gcc require the -b option to appear at the start of the command line 242 shuffle( args, sargs, nargs, 1 ); // make room at front of argument list 243 args[sargs] = ( *new string( arg ) ).c_str(); // pass the argument along 244 if ( putenv( (char *)( *new string( string( "__GCC_MACHINE__=" ) + arg ) ).c_str() ) != 0 ) { 245 cerr << argv[0] << " error, cannot set environment variable." << endl; 246 exit( EXIT_FAILURE ); 247 } // if 248 sargs += 1; 249 nargs += 1; 250 } else if ( prefix( arg, "-V" ) ) { 251 if ( arg.length() == 2 ) { // separate argument ? 252 i += 1; 253 if ( i == argc ) continue; // next argument available ? 254 arg += argv[i]; // concatenate argument 255 } // if 256 // later versions of gcc require the -V option to appear at the start of the command line 257 shuffle( args, sargs, nargs, 1 ); // make room at front of argument list 258 args[sargs] = ( *new string( arg ) ).c_str(); // pass the argument along 259 if ( putenv( (char *)( *new string( string( "__GCC_VERSION__=" ) + arg ) ).c_str() ) != 0 ) { 260 cerr << argv[0] << " error, cannot set environment variable." << endl; 261 exit( EXIT_FAILURE ); 262 } // if 263 sargs += 1; 264 nargs += 1; 214 bprefix = arg.substr(2); // strip the -B flag 265 215 } else if ( arg == "-c" || arg == "-S" || arg == "-E" || arg == "-M" || arg == "-MM" ) { 266 args[nargs] = argv[i]; // pass the argument along 267 nargs += 1; 216 args[nargs++] = argv[i]; // pass argument along 268 217 if ( arg == "-E" || arg == "-M" || arg == "-MM" ) { 269 218 cpp_flag = true; // cpp only … … 272 221 } else if ( arg[1] == 'l' ) { 273 222 // if the user specifies a library, load it after user code 274 libs[nlibs] = argv[i]; 275 nlibs += 1; 223 libs[nlibs++] = argv[i]; 276 224 } else if ( arg == "-m32" ) { 277 225 m32 = true; 278 226 m64 = false; 279 args[nargs] = argv[i]; 280 nargs += 1; 227 args[nargs++] = argv[i]; 281 228 } else if ( arg == "-m64" ) { 282 229 m64 = true; 283 230 m32 = false; 284 args[nargs] = argv[i]; 285 nargs += 1; 231 args[nargs++] = argv[i]; 286 232 } else { 287 233 // concatenate any other arguments 288 args[nargs] = argv[i]; 289 nargs += 1; 234 args[nargs++] = argv[i]; 290 235 } // if 291 236 } else { 292 237 bool cfa = suffix( arg ); // check suffix 293 238 if ( ! x_flag && cfa ) { // no explicit suffix and cfa suffix ? 294 args[nargs] = "-x"; 295 nargs += 1; 296 args[nargs] = "c"; 297 nargs += 1; 239 args[nargs++] = "-x"; 240 args[nargs++] = "c"; 298 241 } // if 299 args[nargs] = argv[i]; // concatenate file 300 nargs += 1; 242 args[nargs++] = argv[i]; // concatenate files 301 243 if ( ! x_flag && cfa ) { // no explicit suffix and cfa suffix ? 302 args[nargs] = "-x"; 303 nargs += 1; 304 args[nargs] = "none"; 305 nargs += 1; 244 args[nargs++] = "-x"; 245 args[nargs++] = "none"; 306 246 } // if 307 247 nonoptarg = true; … … 310 250 311 251 #ifdef __x86_64__ 312 args[nargs] = "-mcx16"; // allow double-wide CAA 313 nargs += 1; 252 args[nargs++] = "-mcx16"; // allow double-wide CAA 314 253 #endif // __x86_64__ 315 254 … … 322 261 #endif // __DEBUG_H__ 323 262 263 // -E flag stops at cc1 stage 1, so cfa-cpp in cc1 stage 2 is never executed. 324 264 if ( cpp_flag && CFA_flag ) { 325 cerr << argv[0] << " error, cannot use -E and -CFA flags together." << endl;326 exit( EXIT_FAILURE );265 CFA_flag = false; 266 cerr << argv[0] << " warning, both -E and -CFA flags specified, using -E and ignoring -CFA." << endl; 327 267 } // if 328 268 329 269 // add the CFA include-library paths, which allow direct access to header files without directory qualification 330 if( !intree ) { 331 args[nargs] = "-I" CFA_INCDIR; 332 nargs += 1; 270 if ( ! intree ) { 271 args[nargs++] = "-I" CFA_INCDIR; 333 272 if ( ! noincstd_flag ) { // do not use during build 334 args[nargs] = "-I" CFA_INCDIR "stdhdr"; 335 nargs += 1; 273 args[nargs++] = "-I" CFA_INCDIR "stdhdr"; 336 274 } // if 337 args[nargs] = "-I" CFA_INCDIR "concurrency"; 338 nargs += 1; 339 args[nargs] = "-I" CFA_INCDIR "containers"; 340 nargs += 1; 341 } else { 342 args[nargs] = "-I" TOP_SRCDIR "libcfa/src"; 343 nargs += 1; 275 args[nargs++] = "-I" CFA_INCDIR "concurrency"; 276 args[nargs++] = "-I" CFA_INCDIR "containers"; 277 } else { 278 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src"; 344 279 if ( ! noincstd_flag ) { // do not use during build 345 args[nargs] = "-I" TOP_SRCDIR "libcfa/src" "/stdhdr"; 346 nargs += 1; 280 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src" "/stdhdr"; 347 281 } // if 348 args[nargs] = "-I" TOP_SRCDIR "libcfa/src" "/concurrency"; 349 nargs += 1; 350 args[nargs] = "-I" TOP_SRCDIR "libcfa/src" "/containers"; 351 nargs += 1; 352 } 282 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src" "/concurrency"; 283 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src" "/containers"; 284 } // if 353 285 354 286 // add stdbool to get defines for bool/true/false 355 args[nargs] = "-imacros"; 356 nargs += 1; 357 args[nargs] = "stdbool.h"; 358 nargs += 1; 287 args[nargs++] = "-imacros"; 288 args[nargs++] = "stdbool.h"; 359 289 360 290 string libbase; 361 if ( !intree ) {291 if ( ! intree ) { 362 292 libbase = CFA_LIBDIR; 363 293 } else { 364 294 libbase = TOP_BUILDDIR "libcfa/"; 365 args[nargs] = "-D__CFA_FLAG__=-t"; 366 nargs += 1; 367 } 368 369 string arch = m32 ? CFA_32_CPU : (m64 ? CFA_64_CPU : CFA_DEFAULT_CPU); 295 Putenv( argv, "-t" ); 296 } // if 297 298 string arch( m32 ? CFA_32_CPU : (m64 ? CFA_64_CPU : CFA_DEFAULT_CPU) ); 370 299 if ( ! m32 && ! m64 ) { 371 300 if ( arch == "x86" ) { 372 args[nargs] = "-m32"; 373 nargs += 1; 301 args[nargs++] = "-m32"; 374 302 } else if ( arch == "x64" ) { 375 args[nargs] = "-m64"; 376 nargs += 1; 303 args[nargs++] = "-m64"; 377 304 } // if 378 305 } // if 379 const char * config = nolib ? "nolib" : (debug ? "debug": "nodebug"); 380 string libdir = libbase + arch + "-" + config; 381 382 if ( ! nolib && ! dirExists( libdir ) ) { 383 cerr << argv[0] << " internal error, configuration " << config << " not installed." << endl; 384 cerr << "Was looking for " << libdir << endl; 385 libdir = libbase + arch + "-" + "nolib"; 386 } // if 387 306 307 string libdir( libbase + arch + "-" + (nolib ? "nolib" : (debug ? "debug": "nodebug")) ); 388 308 if ( ! dirExists( libdir ) ) { 389 cerr << argv[0] << " internal error, cannot find prelude directory." << endl; 390 cerr << "Was looking for " << libdir << endl; 309 cerr << argv[0] << " internal error, cannot find prelude directory " << libdir << endl; 391 310 exit( EXIT_FAILURE ); 392 311 } // if 393 312 394 args[nargs] = ( *new string( string("-D__CFA_FLAG__=--prelude-dir=" ) + libdir + (intree ? "/prelude" : "")) ).c_str();395 nargs += 1;396 397 313 for ( int i = 0; i < nlibs; i += 1 ) { // copy non-user libraries after all user libraries 398 args[nargs] = libs[i]; 399 nargs += 1; 314 args[nargs++] = libs[i]; 400 315 } // for 401 316 402 317 if ( link ) { 403 args[nargs] = "-Xlinker"; 404 nargs += 1; 405 args[nargs] = "--undefined=__cfaabi_dbg_bits_write"; 406 nargs += 1; 407 args[nargs] = "-Xlinker"; 408 nargs += 1; 409 args[nargs] = "--undefined=__cfaabi_interpose_startup"; 410 nargs += 1; 411 args[nargs] = "-Xlinker"; 412 nargs += 1; 413 args[nargs] = "--undefined=__cfaabi_appready_startup"; 414 nargs += 1; 415 416 // include the cfa library in case it's needed 417 args[nargs] = ( *new string( string("-L" ) + libdir + (intree ? "/src/.libs" : "")) ).c_str(); 418 nargs += 1; 419 args[nargs] = ( *new string( string("-Wl,-rpath," ) + libdir + (intree ? "/src/.libs" : "")) ).c_str(); 420 nargs += 1; 421 args[nargs] = "-Wl,--push-state,--as-needed"; 422 nargs += 1; 423 args[nargs] = "-lcfathread"; 424 nargs += 1; 425 args[nargs] = "-Wl,--pop-state"; 426 nargs += 1; 427 args[nargs] = "-lcfa"; 428 nargs += 1; 429 args[nargs] = "-lpthread"; 430 nargs += 1; 431 args[nargs] = "-ldl"; 432 nargs += 1; 433 args[nargs] = "-lrt"; 434 nargs += 1; 435 args[nargs] = "-lm"; 436 nargs += 1; 437 } // if 438 439 // Add exception flags (unconditionally) 440 args[nargs] = "-fexceptions"; 441 nargs += 1; 442 443 // add the correct set of flags based on the type of compile this is 444 445 args[nargs] = ( *new string( string("-D__CFA_MAJOR__=") + Major ) ).c_str(); 446 nargs += 1; 447 args[nargs] = ( *new string( string("-D__CFA_MINOR__=") + Minor ) ).c_str(); 448 nargs += 1; 449 args[nargs] = ( *new string( string("-D__CFA_PATCH__=") + Patch ) ).c_str(); 450 nargs += 1; 451 args[nargs] = "-D__CFA__"; 452 nargs += 1; 453 args[nargs] = "-D__CFORALL__"; 454 nargs += 1; 455 args[nargs] = "-D__cforall"; 456 nargs += 1; 318 args[nargs++] = "-Xlinker"; 319 args[nargs++] = "--undefined=__cfaabi_dbg_bits_write"; 320 args[nargs++] = "-Xlinker"; 321 args[nargs++] = "--undefined=__cfaabi_interpose_startup"; 322 args[nargs++] = "-Xlinker"; 323 args[nargs++] = "--undefined=__cfaabi_appready_startup"; 324 325 // include the cfa library in case it is needed 326 args[nargs++] = ( *new string( string("-L" ) + libdir + (intree ? "/src/.libs" : "")) ).c_str(); 327 args[nargs++] = ( *new string( string("-Wl,-rpath," ) + libdir + (intree ? "/src/.libs" : "")) ).c_str(); 328 args[nargs++] = "-Wl,--push-state,--as-needed"; 329 args[nargs++] = "-lcfathread"; 330 args[nargs++] = "-Wl,--pop-state"; 331 args[nargs++] = "-lcfa"; 332 args[nargs++] = "-lpthread"; 333 args[nargs++] = "-ldl"; 334 args[nargs++] = "-lrt"; 335 args[nargs++] = "-lm"; 336 } // if 337 338 args[nargs++] = "-fexceptions"; // add exception flags (unconditionally) 339 340 // add flags based on the type of compile 341 342 args[nargs++] = ( *new string( string("-D__CFA_MAJOR__=") + Major ) ).c_str(); 343 args[nargs++] = ( *new string( string("-D__CFA_MINOR__=") + Minor ) ).c_str(); 344 args[nargs++] = ( *new string( string("-D__CFA_PATCH__=") + Patch ) ).c_str(); 345 args[nargs++] = "-D__CFA__"; 346 args[nargs++] = "-D__CFORALL__"; 347 args[nargs++] = "-D__cforall"; 457 348 458 349 if ( cpp_flag ) { 459 args[nargs] = "-D__CPP__"; 460 nargs += 1; 461 } // if 462 463 shuffle( args, sargs, nargs, 1 ); // make room at front of argument list 464 nargs += 1; 350 args[nargs++] = "-D__CPP__"; 351 } // if 352 465 353 if ( CFA_flag ) { 466 args[sargs] = "-D__CFA_FLAG__=-N"; 467 args[nargs] = "-D__CFA_PREPROCESS_"; 468 nargs += 1; 469 } else { 470 args[sargs] = "-D__CFA_FLAG__=-L"; 471 } // if 472 sargs += 1; 354 Putenv( argv, "-N" ); 355 Putenv( argv, "-CFA" ); 356 // -CFA implies cc1 stage 2, but gcc does not pass the -o file to this stage because it believe the file is for 357 // the linker. Hence, the -o file is explicit passed to cc1 stage 2 and used as cfa-cpp's output file. 358 if ( o_file ) Putenv( argv, string( "-o=" ) + argv[o_file] ); 359 } else { 360 Putenv( argv, "-L" ); 361 } // if 362 363 Putenv( argv, "--prelude-dir=" + libdir + (intree ? "/prelude" : "") ); 473 364 474 365 if ( debug ) { 475 366 heading += " (debug)"; 476 args[nargs] = "-D__CFA_DEBUG__"; 477 nargs += 1; 367 args[nargs++] = "-D__CFA_DEBUG__"; 478 368 } else { 479 369 heading += " (no debug)"; 480 370 } // if 481 371 482 if ( Bprefix.length() == 0 ) { 483 Bprefix = ! intree ? installlibdir : srcdriverdir; 484 if ( Bprefix[Bprefix.length() - 1] != '/' ) Bprefix += '/'; 485 args[nargs] = ( *new string( string("-D__GCC_BPREFIX__=") + Bprefix ) ).c_str(); 486 nargs += 1; 487 } // if 488 489 args[nargs] = "-Xlinker"; // used by backtrace 490 nargs += 1; 491 args[nargs] = "-export-dynamic"; 492 nargs += 1; 372 if ( bprefix.length() == 0 ) { 373 bprefix = ! intree ? installlibdir : srcdriverdir; 374 if ( bprefix[bprefix.length() - 1] != '/' ) bprefix += '/'; 375 Putenv( argv, ( *new string( string("-B=") + bprefix ) ).c_str() ); 376 } // if 377 378 args[nargs++] = "-Xlinker"; // used by backtrace 379 args[nargs++] = "-export-dynamic"; 493 380 494 381 // execute the compilation command … … 504 391 505 392 if ( prefix( compiler_name, "gcc" ) ) { // allow suffix on gcc name 506 args[nargs] = "-no-integrated-cpp"; 507 nargs += 1; 508 args[nargs] = "-Wno-deprecated"; 509 nargs += 1; 510 #ifdef HAVE_CAST_FUNCTION_TYPE 511 args[nargs] = "-Wno-cast-function-type"; 512 nargs += 1; 513 #endif // HAVE_CAST_FUNCTION_TYPE 393 args[nargs++] = "-no-integrated-cpp"; 394 args[nargs++] = "-Wno-deprecated"; 395 #ifdef HAVE_CAST_FUNCTION_TYPE 396 args[nargs++] = "-Wno-cast-function-type"; 397 #endif // HAVE_CAST_FUNCTION_TYPE 514 398 if ( ! std_flag ) { // default c11, if none specified 515 args[nargs] = "-std=gnu11"; 516 nargs += 1; 399 args[nargs++] = "-std=gnu11"; 517 400 } // if 518 args[nargs] = "-fgnu89-inline"; 519 nargs += 1; 520 args[nargs] = "-D__int8_t_defined"; // prevent gcc type-size attributes 521 nargs += 1; 522 args[nargs] = ( *new string( string("-B") + Bprefix ) ).c_str(); 523 nargs += 1; 401 args[nargs++] = "-fgnu89-inline"; 402 args[nargs++] = "-D__int8_t_defined"; // prevent gcc type-size attributes 403 args[nargs++] = ( *new string( string("-B") + bprefix ) ).c_str(); 524 404 } else { 525 405 cerr << argv[0] << " error, compiler \"" << compiler_name << "\" unsupported." << endl; … … 527 407 } // if 528 408 529 args[nargs] = NULL; // terminate with NULL409 args[nargs] = nullptr; // terminate 530 410 531 411 #ifdef __DEBUG_H__ 532 412 cerr << "nargs: " << nargs << endl; 533 413 cerr << "args:" << endl; 534 for ( int i = 0; args[i] != NULL; i += 1 ) {414 for ( int i = 0; args[i] != nullptr; i += 1 ) { 535 415 cerr << " \"" << args[i] << "\"" << endl; 536 416 } // for … … 554 434 if ( argc == 2 ) exit( EXIT_SUCCESS ); // if only the -v flag is specified, do not invoke gcc 555 435 556 for ( int i = 0; args[i] != NULL; i += 1 ) {436 for ( int i = 0; args[i] != nullptr; i += 1 ) { 557 437 cerr << args[i] << " "; 558 438 } // for … … 568 448 569 449 execvp( args[0], (char *const *)args ); // should not return 570 perror( "CFA Translator error: cfa level,execvp" );450 perror( "CFA Translator error: execvp" ); 571 451 exit( EXIT_FAILURE ); 572 452 } // main
Note:
See TracChangeset
for help on using the changeset viewer.
