Ref Trac #1032; added suport for full path launching with TotalView
This commit was SVN r14789.
Этот коммит содержится в:
родитель
f95442dec9
Коммит
de676d717b
@ -10,6 +10,7 @@
|
|||||||
* University of Stuttgart. All rights reserved.
|
* University of Stuttgart. All rights reserved.
|
||||||
* Copyright (c) 2004-2005 The Regents of the University of California.
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
||||||
* All rights reserved.
|
* All rights reserved.
|
||||||
|
* Copyright (c) 2007 Sun Microsystems, Inc. All rights reserved.
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
*
|
*
|
||||||
* Additional copyrights may follow
|
* Additional copyrights may follow
|
||||||
@ -408,8 +409,14 @@ void orte_totalview_init_after_spawn(orte_jobid_t jobid)
|
|||||||
appctx = map->apps[proc->app_idx];
|
appctx = map->apps[proc->app_idx];
|
||||||
|
|
||||||
MPIR_proctable[i].host_name = strdup(node->nodename);
|
MPIR_proctable[i].host_name = strdup(node->nodename);
|
||||||
MPIR_proctable[i].executable_name =
|
if ( NULL == strncmp(appctx->app, OPAL_PATH_SEP, 1 )) {
|
||||||
opal_os_path( false, appctx->cwd, appctx->app, NULL );
|
MPIR_proctable[i].executable_name =
|
||||||
|
opal_os_path( false, appctx->app, NULL );
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
MPIR_proctable[i].executable_name =
|
||||||
|
opal_os_path( true, appctx->app, NULL );
|
||||||
|
}
|
||||||
MPIR_proctable[i].pid = proc->pid;
|
MPIR_proctable[i].pid = proc->pid;
|
||||||
i++;
|
i++;
|
||||||
}
|
}
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user