diff --git a/ompi/datatype/datatype_internal.h b/ompi/datatype/datatype_internal.h index 456d061280..fbf5a09c2a 100644 --- a/ompi/datatype/datatype_internal.h +++ b/ompi/datatype/datatype_internal.h @@ -332,6 +332,8 @@ do { \ #define COMPUTE_SPECIFIC_CHECKSUM( DATA, LENGTH, ADLER32 ) #endif /* OMPI_REQUIRE_DATA_VALIDATION */ +OMPI_DECLSPEC int32_t ompi_ddt_print_args( const ompi_datatype_t* pData ); + #if defined(c_plusplus) || defined(__cplusplus) } #endif diff --git a/ompi/datatype/dt_module.c b/ompi/datatype/dt_module.c index f585aa54f8..8aa69a201a 100644 --- a/ompi/datatype/dt_module.c +++ b/ompi/datatype/dt_module.c @@ -732,5 +732,8 @@ void ompi_ddt_dump( const ompi_datatype_t* pData ) } buffer[index] = '\0'; /* make sure we end the string with 0 */ opal_output( 0, "%s\n", buffer ); + + ompi_ddt_print_args( pData ); + free(buffer); }