Changes in driver/cfa.cc [aced69a:4f5a8a2]
- File:
-
- 1 edited
-
driver/cfa.cc (modified) (19 diffs)
Legend:
- Unmodified
- Added
- Removed
-
driver/cfa.cc
raced69a r4f5a8a2 10 10 // Created On : Tue Aug 20 13:44:49 2002 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Tue Sep 10 17:00:15 201913 // Update Count : 42012 // Last Modified On : Sat Aug 10 08:44:15 2019 13 // Update Count : 311 14 14 // 15 15 … … 28 28 #include "config.h" // configure info 29 29 30 30 31 using std::cerr; 31 32 using std::endl; … … 33 34 using std::to_string; 34 35 36 35 37 //#define __DEBUG_H__ 36 38 37 39 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 40 bool prefix( string arg, string pre ) { 51 41 return arg.substr( 0, pre.size() ) == pre; 52 42 } // prefix 53 43 54 bool suffix( const string & arg ) { // check if string has suffix44 bool suffix( string arg ) { 55 45 enum { NumSuffixes = 3 }; 56 46 static const string suffixes[NumSuffixes] = { "cfa", "hfa", "ifa" }; 57 47 //std::cerr << arg << std::endl; 58 48 size_t dot = arg.find_last_of( "." ); 49 //std::cerr << dot << " " << (dot != string::npos ? arg.substr( dot + 1 ) : "fred" ) << std::endl; 59 50 if ( dot == string::npos ) return false; 60 51 const string * end = suffixes + NumSuffixes; … … 63 54 64 55 65 static inline bool dirExists( const string & path ) { // check if directory exists 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 ) { 66 70 struct stat info; 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) 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 73 80 #define str(s) #s 74 81 75 82 int main( int argc, char * argv[] ) { 76 83 string Version( CFA_VERSION_LONG ); // current version number from CONFIG 77 string Major( xstr( CFA_VERSION_MAJOR ) ), Minor( xstr( CFA_VERSION_MINOR ) ), Patch( xstr( CFA_VERSION_PATCH ) );84 string Major( str( CFA_VERSION_MAJOR ) ), Minor( str( CFA_VERSION_MINOR ) ), Patch( str( CFA_VERSION_PATCH ) ); 78 85 79 86 string installincdir( CFA_INCDIR ); // fixed location of include files … … 83 90 string heading; // banner printed at start of cfa compilation 84 91 string arg; // current command-line argument during command-line parsing 85 string bprefix; // path where gcc looks for compilersteps92 string Bprefix; // path where gcc looks for compiler command steps 86 93 string langstd; // language standard 87 94 … … 90 97 91 98 bool x_flag = false; // -x flag 92 bool nonoptarg = false; // no non-option arguments specified, i.e., no file names93 bool link = true; // link stage occurring99 bool nonoptarg = false; // indicates non-option argument specified 100 bool link = true; // linking as well as compiling 94 101 bool verbose = false; // -v flag 95 102 bool quiet = false; // -quiet flag … … 104 111 bool m32 = false; // -m32 flag 105 112 bool m64 = false; // -m64 flag 106 bool intree = false; // build in tree 107 int o_file = 0; // -o filename position 113 bool intree = false; 108 114 109 115 const char *args[argc + 100]; // cfa command line values, plus some space for additional flags … … 129 135 130 136 if ( arg == "-Xlinker" || arg == "-o" ) { 131 args[nargs++] = argv[i]; // pass argument along 137 args[nargs] = argv[i]; // pass the argument along 138 nargs += 1; 132 139 i += 1; 133 140 if ( i == argc ) continue; // next argument available ? 134 args[nargs ++] = argv[i]; // passargument along135 if ( arg == "-o" ) o_file = i; // remember file141 args[nargs] = argv[i]; // pass the argument along 142 nargs += 1; 136 143 } else if ( arg == "-XCFA" ) { // CFA pass through 137 144 i += 1; 138 Putenv( argv, argv[i] ); 145 args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + argv[i] ) ).c_str(); 146 nargs += 1; 139 147 140 148 // CFA specific arguments … … 143 151 CFA_flag = true; // strip the -CFA flag 144 152 link = false; 145 args[nargs++] = "-fsyntax-only"; // stop after stage 2 153 args[nargs] = "-E"; // replace the argument with -E 154 nargs += 1; 146 155 } else if ( arg == "-debug" ) { 147 156 debug = true; // strip the debug flag 148 157 } else if ( arg == "-nodebug" ) { 149 debug = false; // strip the nodebug flag158 debug = false; // strip the debug flag 150 159 } else if ( arg == "-nolib" ) { 151 160 nolib = true; // strip the nodebug flag … … 167 176 if ( i == argc ) continue; // next argument available ? 168 177 compiler_path = argv[i]; 169 Putenv( argv, arg + "=" + 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 170 182 171 183 // C specific arguments … … 173 185 } else if ( arg == "-v" ) { 174 186 verbose = true; // verbosity required 175 args[nargs++] = argv[i]; // pass argument along 187 args[nargs] = argv[i]; // pass the argument along 188 nargs += 1; 176 189 } else if ( arg == "-g" ) { 177 190 debugging = true; // symbolic debugging required 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 191 args[nargs] = argv[i]; // pass the argument along 192 nargs += 1; 182 193 } else if ( prefix( arg, "-x" ) ) { // file suffix ? 183 194 string lang; 184 args[nargs++] = argv[i]; // pass argument along 195 args[nargs] = argv[i]; // pass the argument along 196 nargs += 1; 185 197 if ( arg.length() == 2 ) { // separate argument ? 186 198 i += 1; 187 199 if ( i == argc ) continue; // next argument available ? 188 200 lang = argv[i]; 189 args[nargs++] = argv[i]; // pass argument along 201 args[nargs] = argv[i]; // pass the argument along 202 nargs += 1; 190 203 } else { 191 204 lang = arg.substr( 2 ); … … 194 207 } else if ( prefix( arg, "-std=" ) || prefix( arg, "--std=" ) ) { 195 208 std_flag = true; // -std=XX provided 196 args[nargs++] = argv[i]; // pass argument along 209 args[nargs] = argv[i]; // pass the argument along 210 nargs += 1; 197 211 } else if ( arg == "-w" ) { 198 args[nargs++] = argv[i]; // pass argument along 199 Putenv( argv, arg ); 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; 200 216 } else if ( prefix( arg, "-W" ) ) { // check before next tests 201 217 if ( arg == "-Werror" || arg == "-Wall" ) { 202 args[nargs++] = argv[i]; // pass argument along 203 Putenv( argv, argv[i] ); 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; 204 222 } else { 205 223 unsigned int adv = prefix( arg, "-Wno-" ) ? 5 : 2; 206 args[nargs] = argv[i]; // conditionally pass argument along207 const char * warning = argv[i] + adv; // extract warning224 args[nargs] = argv[i]; // conditionally pass the argument along 225 const char * warning = argv[i] + adv; // extract warning 208 226 if ( SemanticWarning_Exist( warning ) ) { // replace the argument for cfa-cpp 209 Putenv( argv, arg);227 args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + arg ) ).c_str(); 210 228 } // if 211 229 nargs += 1; 212 230 } // if 213 231 } else if ( prefix( arg, "-B" ) ) { 214 bprefix = arg.substr(2); // strip the -B flag 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; 215 265 } else if ( arg == "-c" || arg == "-S" || arg == "-E" || arg == "-M" || arg == "-MM" ) { 216 args[nargs++] = argv[i]; // pass argument along 266 args[nargs] = argv[i]; // pass the argument along 267 nargs += 1; 217 268 if ( arg == "-E" || arg == "-M" || arg == "-MM" ) { 218 269 cpp_flag = true; // cpp only … … 221 272 } else if ( arg[1] == 'l' ) { 222 273 // if the user specifies a library, load it after user code 223 libs[nlibs++] = argv[i]; 274 libs[nlibs] = argv[i]; 275 nlibs += 1; 224 276 } else if ( arg == "-m32" ) { 225 277 m32 = true; 226 278 m64 = false; 227 args[nargs++] = argv[i]; 279 args[nargs] = argv[i]; 280 nargs += 1; 228 281 } else if ( arg == "-m64" ) { 229 282 m64 = true; 230 283 m32 = false; 231 args[nargs++] = argv[i]; 284 args[nargs] = argv[i]; 285 nargs += 1; 232 286 } else { 233 287 // concatenate any other arguments 234 args[nargs++] = argv[i]; 288 args[nargs] = argv[i]; 289 nargs += 1; 235 290 } // if 236 291 } else { 237 292 bool cfa = suffix( arg ); // check suffix 238 293 if ( ! x_flag && cfa ) { // no explicit suffix and cfa suffix ? 239 args[nargs++] = "-x"; 240 args[nargs++] = "c"; 294 args[nargs] = "-x"; 295 nargs += 1; 296 args[nargs] = "c"; 297 nargs += 1; 241 298 } // if 242 args[nargs++] = argv[i]; // concatenate files 299 args[nargs] = argv[i]; // concatenate file 300 nargs += 1; 243 301 if ( ! x_flag && cfa ) { // no explicit suffix and cfa suffix ? 244 args[nargs++] = "-x"; 245 args[nargs++] = "none"; 302 args[nargs] = "-x"; 303 nargs += 1; 304 args[nargs] = "none"; 305 nargs += 1; 246 306 } // if 247 307 nonoptarg = true; … … 250 310 251 311 #ifdef __x86_64__ 252 args[nargs++] = "-mcx16"; // allow double-wide CAA 312 args[nargs] = "-mcx16"; // allow double-wide CAA 313 nargs += 1; 253 314 #endif // __x86_64__ 254 315 … … 261 322 #endif // __DEBUG_H__ 262 323 263 // -E flag stops at cc1 stage 1, so cfa-cpp in cc1 stage 2 is never executed.264 324 if ( cpp_flag && CFA_flag ) { 265 CFA_flag = false;266 cerr << argv[0] << " warning, both -E and -CFA flags specified, using -E and ignoring -CFA." << endl;325 cerr << argv[0] << " error, cannot use -E and -CFA flags together." << endl; 326 exit( EXIT_FAILURE ); 267 327 } // if 268 328 269 329 // add the CFA include-library paths, which allow direct access to header files without directory qualification 270 if ( ! intree ) { 271 args[nargs++] = "-I" CFA_INCDIR; 330 if( !intree ) { 331 args[nargs] = "-I" CFA_INCDIR; 332 nargs += 1; 272 333 if ( ! noincstd_flag ) { // do not use during build 273 args[nargs++] = "-I" CFA_INCDIR "stdhdr"; 334 args[nargs] = "-I" CFA_INCDIR "stdhdr"; 335 nargs += 1; 274 336 } // if 275 args[nargs++] = "-I" CFA_INCDIR "concurrency"; 276 args[nargs++] = "-I" CFA_INCDIR "containers"; 337 args[nargs] = "-I" CFA_INCDIR "concurrency"; 338 nargs += 1; 339 args[nargs] = "-I" CFA_INCDIR "containers"; 340 nargs += 1; 277 341 } else { 278 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src"; 342 args[nargs] = "-I" TOP_SRCDIR "libcfa/src"; 343 nargs += 1; 279 344 if ( ! noincstd_flag ) { // do not use during build 280 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src" "/stdhdr"; 345 args[nargs] = "-I" TOP_SRCDIR "libcfa/src" "/stdhdr"; 346 nargs += 1; 281 347 } // if 282 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src" "/concurrency"; 283 args[nargs++] = "-I" TOP_SRCDIR "libcfa/src" "/containers"; 284 } // 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 } 285 353 286 354 // add stdbool to get defines for bool/true/false 287 args[nargs++] = "-imacros"; 288 args[nargs++] = "stdbool.h"; 355 args[nargs] = "-imacros"; 356 nargs += 1; 357 args[nargs] = "stdbool.h"; 358 nargs += 1; 289 359 290 360 string libbase; 291 if ( !intree ) {361 if( !intree ) { 292 362 libbase = CFA_LIBDIR; 293 363 } else { 294 364 libbase = TOP_BUILDDIR "libcfa/"; 295 Putenv( argv, "-t" ); 296 } // if 297 298 string arch( m32 ? CFA_32_CPU : (m64 ? CFA_64_CPU : CFA_DEFAULT_CPU) ); 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); 299 370 if ( ! m32 && ! m64 ) { 300 371 if ( arch == "x86" ) { 301 args[nargs++] = "-m32"; 372 args[nargs] = "-m32"; 373 nargs += 1; 302 374 } else if ( arch == "x64" ) { 303 args[nargs++] = "-m64"; 375 args[nargs] = "-m64"; 376 nargs += 1; 304 377 } // if 305 378 } // if 306 307 string libdir( libbase + arch + "-" + (nolib ? "nolib" : (debug ? "debug": "nodebug")) ); 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 308 388 if ( ! dirExists( libdir ) ) { 309 cerr << argv[0] << " internal error, cannot find prelude directory " << libdir << endl; 389 cerr << argv[0] << " internal error, cannot find prelude directory." << endl; 390 cerr << "Was looking for " << libdir << endl; 310 391 exit( EXIT_FAILURE ); 311 392 } // if 312 393 394 args[nargs] = ( *new string( string("-D__CFA_FLAG__=--prelude-dir=" ) + libdir + (intree ? "/prelude" : "")) ).c_str(); 395 nargs += 1; 396 313 397 for ( int i = 0; i < nlibs; i += 1 ) { // copy non-user libraries after all user libraries 314 args[nargs++] = libs[i]; 398 args[nargs] = libs[i]; 399 nargs += 1; 315 400 } // for 316 401 317 402 if ( link ) { 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"; 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; 348 457 349 458 if ( cpp_flag ) { 350 args[nargs++] = "-D__CPP__"; 351 } // if 352 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; 353 465 if ( CFA_flag ) { 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] ); 466 args[sargs] = "-D__CFA_FLAG__=-N"; 467 args[nargs] = "-D__CFA_PREPROCESS_"; 468 nargs += 1; 359 469 } else { 360 Putenv( argv, "-L" ); 361 } // if 362 363 Putenv( argv, "--prelude-dir=" + libdir + (intree ? "/prelude" : "") ); 470 args[sargs] = "-D__CFA_FLAG__=-L"; 471 } // if 472 sargs += 1; 364 473 365 474 if ( debug ) { 366 475 heading += " (debug)"; 367 args[nargs++] = "-D__CFA_DEBUG__"; 476 args[nargs] = "-D__CFA_DEBUG__"; 477 nargs += 1; 368 478 } else { 369 479 heading += " (no debug)"; 370 480 } // if 371 481 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"; 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; 380 493 381 494 // execute the compilation command … … 391 504 392 505 if ( prefix( compiler_name, "gcc" ) ) { // allow suffix on gcc name 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 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 398 514 if ( ! std_flag ) { // default c11, if none specified 399 args[nargs++] = "-std=gnu11"; 515 args[nargs] = "-std=gnu11"; 516 nargs += 1; 400 517 } // if 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(); 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; 404 524 } else { 405 525 cerr << argv[0] << " error, compiler \"" << compiler_name << "\" unsupported." << endl; … … 407 527 } // if 408 528 409 args[nargs] = nullptr; // terminate529 args[nargs] = NULL; // terminate with NULL 410 530 411 531 #ifdef __DEBUG_H__ 412 532 cerr << "nargs: " << nargs << endl; 413 533 cerr << "args:" << endl; 414 for ( int i = 0; args[i] != nullptr; i += 1 ) {534 for ( int i = 0; args[i] != NULL; i += 1 ) { 415 535 cerr << " \"" << args[i] << "\"" << endl; 416 536 } // for … … 434 554 if ( argc == 2 ) exit( EXIT_SUCCESS ); // if only the -v flag is specified, do not invoke gcc 435 555 436 for ( int i = 0; args[i] != nullptr; i += 1 ) {556 for ( int i = 0; args[i] != NULL; i += 1 ) { 437 557 cerr << args[i] << " "; 438 558 } // for … … 448 568 449 569 execvp( args[0], (char *const *)args ); // should not return 450 perror( "CFA Translator error: execvp" );570 perror( "CFA Translator error: cfa level, execvp" ); 451 571 exit( EXIT_FAILURE ); 452 572 } // main
Note:
See TracChangeset
for help on using the changeset viewer.
