ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

Misc fixes..

Просмотр исходного кода 
This commit was SVN r6583.
Этот коммит содержится в:
Galen Shipman 2005-07-21 20:26:17 +00:00
родитель d4058f65e2
Коммит 4c119def85
3 изменённых файлов: 17 добавлений и 11 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

24
ompi/mca/btl/base/btl_base_error.h
Просмотреть файл

@ -18,15 +18,15 @@
#define MCA_BTL_BASE_ERROR_H
#if defined(ACCEPT_C99) && __STDC_VERSION__ >= 199901L
#if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L)
# define BTL_ERROR(fmt, ...) { \
opal_output(0, "[%s:%d:%d] my_name: [%lu,%lu,%lu] " fmt "\n", __FILE__, __LINE__, __func__, \
opal_output(0, "[%s:%d:%s] my_name: [%lu,%lu,%lu] " fmt "\n", __FILE__, __LINE__, __func__, \
ORTE_NAME_ARGS(orte_process_info.my_name), __VA_ARGS__); \
}
#else
# if defined(__GNUC__) && !defined(__STDC__)
#define BTL_ERROR(fmt, args...) { \
opal_output(0, "[%s:%d:%d] my_name: [%lu,%lu,%lu]" fmt "\n", __FILE__, __LINE__, __func__,\
opal_output(0, "[%s:%d:%s] my_name: [%lu,%lu,%lu]" fmt "\n", __FILE__, __LINE__, __func__,\
ORTE_NAME_ARGS(orte_process_info.my_name), ##args); \
}
#else
@ -34,28 +34,34 @@ static inline void BTL_ERROR(char *fmt, ... )
{
va_list list;
va_start(list, fmt);
opal_output(0, "[%s:%d:%d] my_name: [%lu,%lu,%lu]", fmt, __FILE__, __LINE__, __func__,
ORTE_NAME_ARGS(orte_process_info.my_name), list);
fprintf(stderr,"[%s:%d:%s] my_name: [%lu,%lu,%lu]",
__FILE__, __LINE__, __func__,
ORTE_NAME_ARGS(orte_process_info.my_name));
vfprintf(stderr, fmt, list);
fprintf(stderr, "\n");
va_end(list);
}
#endif
#endif
#if 0
#if defined(ACCEPT_C99) && __STDC_VERSION__ >= 199901L
#if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901)L
# define BTL_DEBUG_OUT(fmt, ...) { \
opal_output(0, "[%s:%d:%d] " fmt "\n", __FILE__, __LINE__, __func__, __VA_ARGS__); \
opal_output(0, "[%s:%d:%s] " fmt "\n", __FILE__, __LINE__, __func__, __VA_ARGS__); \
}
#else
# if defined(__GNUC__) && !defined(__STDC__)
#define BTL_DEBUG_OUT(fmt, args...) { \
opal_output(0, "[%s:%d:%d] " fmt "\n", __FILE__, __LINE__, __func__, ##args); \
opal_output(0, "[%s:%d:%s] " fmt "\n", __FILE__, __LINE__, __func__, ##args); \
}
#else
static inline void BTL_DEBUG_OUT(char *fmt, ... )
{
va_list list;
va_start(list, fmt);
opal_output(0, "[%s:%d:%d ", fmt, __FILE__, __LINE__, __func__, list);
fprintf(stderr, "[%s:%d:%s]", __FILE__, __LINE__, __func__, list);
vfprintf(stderr, fmt, list);
vfpritnf(stderr, "\n");
va_end(list);
}
#endif

2
ompi/mca/btl/openib/btl_openib.c
Просмотреть файл

@ -272,7 +272,7 @@ mca_btl_base_descriptor_t* mca_btl_openib_prepare_src(
bool is_leave_pinned = openib_reg->base_reg.is_leave_pinned;
size_t reg_len;
/* the memory is already pinned and we have contiguous user data */ o
/* the memory is already pinned and we have contiguous user data */
MCA_BTL_IB_FRAG_ALLOC_FRAG(btl, frag, rc);
if(NULL == frag){

2
ompi/mca/btl/openib/btl_openib_endpoint.c
Просмотреть файл

@ -85,7 +85,7 @@ static inline int mca_btl_openib_endpoint_post_send(mca_btl_openib_module_t* ope
if(frag->sg_entry.length <= openib_btl->ib_inline_max) {
frag->wr_desc.sr_desc.send_flags |= IBV_SEND_INLINE;
/* frag->wr_desc.sr_desc.send_flags |= IBV_SEND_INLINE; */
}