1
1
This commit was SVN r2603.
Этот коммит содержится в:
Tim Woodall 2004-09-10 18:16:18 +00:00
родитель c042159461
Коммит 157082407b
2 изменённых файлов: 25 добавлений и 2 удалений

Просмотреть файл

@ -30,8 +30,14 @@ mca_svc_base_module_t* mca_svc_exec_component_init(void);
int mca_svc_exec_module_init(mca_svc_base_module_t*); int mca_svc_exec_module_init(mca_svc_base_module_t*);
int mca_svc_exec_module_fini(mca_svc_base_module_t*); int mca_svc_exec_module_fini(mca_svc_base_module_t*);
struct mca_svc_exec_component_t {
mca_svc_base_component_t exec_base;
int exec_debug;
};
typedef struct mca_svc_exec_component_t mca_svc_exec_component_t;
extern mca_svc_base_module_t mca_svc_exec_module; extern mca_svc_base_module_t mca_svc_exec_module;
extern mca_svc_base_component_t mca_svc_exec_component; extern mca_svc_exec_component_t mca_svc_exec_component;
#endif #endif

Просмотреть файл

@ -1,7 +1,8 @@
#include "svc_exec.h" #include "svc_exec.h"
mca_svc_base_component_t mca_svc_exec_component = { mca_svc_exec_component_t mca_svc_exec_component = {
{
/* First, the mca_base_module_t struct containing meta /* First, the mca_base_module_t struct containing meta
information about the module itself */ information about the module itself */
{ {
@ -27,8 +28,22 @@ mca_svc_base_component_t mca_svc_exec_component = {
}, },
mca_svc_exec_component_init mca_svc_exec_component_init
},
0 /* exec_debug */
}; };
/**
* Utility function to register parameters
*/
static inline int mca_svc_exec_param_register_int(
const char* param_name,
int default_value)
{
int id = mca_base_param_register_int("svc","exec",param_name,NULL,default_value);
int param_value = default_value;
mca_base_param_lookup_int(id,&param_value);
return param_value;
}
/** /**
* *
@ -36,6 +51,8 @@ mca_svc_base_component_t mca_svc_exec_component = {
int mca_svc_exec_component_open(void) int mca_svc_exec_component_open(void)
{ {
mca_svc_exec_component.exec_debug =
mca_svc_exec_param_register_int("debug", 0);
return OMPI_SUCCESS; return OMPI_SUCCESS;
} }