When on Windows systems, use ";" as a path delimiter
This commit was SVN r4125.
Этот коммит содержится в:
родитель
e0e47f37a4
Коммит
4ee895c243
@ -193,7 +193,11 @@ static void find_dyn_components(const char *path, const char *type_name,
|
|||||||
dir = path_to_use;
|
dir = path_to_use;
|
||||||
if (NULL != dir) {
|
if (NULL != dir) {
|
||||||
do {
|
do {
|
||||||
|
#ifdef WIN32
|
||||||
|
end = strchr(dir, ';');
|
||||||
|
#else
|
||||||
end = strchr(dir, ':');
|
end = strchr(dir, ':');
|
||||||
|
#endif
|
||||||
if (NULL != end) {
|
if (NULL != end) {
|
||||||
*end = '\0';
|
*end = '\0';
|
||||||
}
|
}
|
||||||
|
@ -60,7 +60,11 @@ int mca_base_open(void)
|
|||||||
|
|
||||||
/* Register some params */
|
/* Register some params */
|
||||||
|
|
||||||
|
#ifdef WIN32
|
||||||
|
asprintf(&value, "%s;~/.openmpi/components", OMPI_PKGLIBDIR);
|
||||||
|
#else
|
||||||
asprintf(&value, "%s:~/.openmpi/components", OMPI_PKGLIBDIR);
|
asprintf(&value, "%s:~/.openmpi/components", OMPI_PKGLIBDIR);
|
||||||
|
#endif
|
||||||
mca_base_param_component_path =
|
mca_base_param_component_path =
|
||||||
mca_base_param_register_string("base", NULL, "component_path",
|
mca_base_param_register_string("base", NULL, "component_path",
|
||||||
"component_path", value);
|
"component_path", value);
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user