static void parseCommandLineFiles() { int fileNum = 0; const char* inputFileName = NULL; addModulePaths(); addDashMsToUserPath(); if (printSearchDirs) { printModuleSearchPath(); } while ((inputFileName = nthFilename(fileNum++))) { if (isChplSource(inputFileName) == true) { parseFile(inputFileName, MOD_USER, true); } } if (fDocs == false || fDocsProcessUsedModules == true) { parseDependentModules(false); ensureRequiredStandardModulesAreParsed(); forv_Vec(ModuleSymbol, mod, allModules) { mod->addDefaultUses(); } }
void genIncludeCommandLineHeaders(FILE* outfile) { int filenum = 0; while (const char* inputFilename = nthFilename(filenum++)) { if (isCHeader(inputFilename)) { fprintf(outfile, "#include \"%s\"\n", inputFilename); } } }
static void countTokensInCmdLineFiles() { int fileNum = 0; const char* inputFileName = 0; while ((inputFileName = nthFilename(fileNum++))) { if (isChplSource(inputFileName) == true) { parseFile(inputFileName, MOD_USER, true); } } finishCountingTokens(); }
static void genCFileBuildRules(FILE* makefile) { int filenum = 0; while (const char* inputFilename = nthFilename(filenum++)) { if (isCSource(inputFilename)) { const char* objFilename = objectFileForCFile(inputFilename); fprintf(makefile, "%s: %s FORCE\n", objFilename, inputFilename); fprintf(makefile, "\t$(CC) -c -o $@ $(GEN_CFLAGS) $(COMP_GEN_CFLAGS) $<\n"); fprintf(makefile, "\n"); } } fprintf(makefile, "\n"); }
static void genCFiles(FILE* makefile) { int filenum = 0; int first = 1; while (const char* inputFilename = nthFilename(filenum++)) { if (isCSource(inputFilename)) { if (first) { fprintf(makefile, "CHPL_CL_C_SRCS = \\\n"); first = 0; } fprintf(makefile, "\t%s \\\n", inputFilename); } } if (!first) fprintf(makefile, "\n"); }
static void genObjFiles(FILE* makefile) { int filenum = 0; int first = 1; while (const char* inputFilename = nthFilename(filenum++)) { bool objfile = isObjFile(inputFilename); bool cfile = isCSource(inputFilename); if (objfile || cfile) { if (first) { fprintf(makefile, "CHPL_CL_OBJS = \\\n"); first = 0; } if (objfile) { fprintf(makefile, "\t%s \\\n", inputFilename); } else { const char* pathlessFilename = stripdirectories(inputFilename); const char* objFilename = genIntermediateFilename(astr(pathlessFilename, ".o")); fprintf(makefile, "\t%s \\\n", objFilename); } } } if (!first) fprintf(makefile, "\n"); }