static void addModulePath(ArgumentState* arg_state, char* newpath) { addFlagModulePath(newpath); }
void setupModulePaths() { const char* modulesRoot = NULL; if (fMinimalModules == true) { modulesRoot = "modules/minimal"; } else if (fUseIPE == true) { modulesRoot = "modules/ipe"; } else { modulesRoot = "modules"; } // // Set up the search path for modulesRoot/internal // sIntModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/internal/localeModels/", CHPL_LOCALE_MODEL)); sIntModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/internal/tasktable/", fEnableTaskTracking ? "on" : "off")); sIntModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/internal/tasks/", CHPL_TASKS)); sIntModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/internal/comm/", CHPL_COMM)); sIntModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/internal")); // // Set up the search path for modulesRoot/standard // sStdModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/standard/gen/", CHPL_TARGET_PLATFORM, "-", CHPL_TARGET_COMPILER)); sStdModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/standard")); sStdModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/packages")); sStdModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/layouts")); sStdModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/dists")); sStdModPath.add(astr(CHPL_HOME, "/", modulesRoot, "/dists/dims")); if (const char* envvarpath = getenv("CHPL_MODULE_PATH")) { char path[FILENAME_MAX + 1]; char* colon = NULL; strncpy(path, envvarpath, FILENAME_MAX); do { char* start = colon ? colon+1 : path; colon = strchr(start, ':'); if (colon != NULL) { *colon = '\0'; } addFlagModulePath(start); } while (colon); } }
static void addModulePath(const ArgumentDescription* desc, const char* newpath) { addFlagModulePath(newpath); }
static void addModulePath(const ArgumentState* state, const char* newpath) { addFlagModulePath(newpath); }