io/ompio: fix the reference count of basic datatypes used as etypes or ftypes.

edgargabriel · edgargabriel · commit be183cb3dd71 · 2016-08-31T14:08:26.000-05:00
diff --git a/ompi/mca/common/ompio/common_ompio_file_view.c b/ompi/mca/common/ompio/common_ompio_file_view.c
@@ -32,6 +32,7 @@ static int datatype_duplicate  (ompi_datatype_t *oldtype, ompi_datatype_t **newt
 {
     ompi_datatype_t *type;
     if( ompi_datatype_is_predefined(oldtype) ) {
+	OBJ_RETAIN(oldtype);
         *newtype = oldtype;
         return OMPI_SUCCESS;
     }
diff --git a/ompi/mca/io/ompio/io_ompio_file_set_view.c b/ompi/mca/io/ompio/io_ompio_file_set_view.c
@@ -38,6 +38,7 @@ static int datatype_duplicate  (ompi_datatype_t *oldtype, ompi_datatype_t **newt
 {
     ompi_datatype_t *type;
     if( ompi_datatype_is_predefined(oldtype) ) {
+        OBJ_RETAIN(oldtype);
         *newtype = oldtype;
         return OMPI_SUCCESS;
     }

Original file line number	Diff line number	Diff line change
`@@ -32,6 +32,7 @@ static int datatype_duplicate (ompi_datatype_t oldtype, ompi_datatype_t *newt`
`32`	`32`	`{`
`33`	`33`	`ompi_datatype_t *type;`
`34`	`34`	`if( ompi_datatype_is_predefined(oldtype) ) {`
	`35`	`+ OBJ_RETAIN(oldtype);`
`35`	`36`	`*newtype = oldtype;`
`36`	`37`	`return OMPI_SUCCESS;`
`37`	`38`	`}`
Original file line number	Diff line number	Diff line change
`@@ -38,6 +38,7 @@ static int datatype_duplicate (ompi_datatype_t oldtype, ompi_datatype_t *newt`
`38`	`38`	`{`
`39`	`39`	`ompi_datatype_t *type;`
`40`	`40`	`if( ompi_datatype_is_predefined(oldtype) ) {`
	`41`	`+ OBJ_RETAIN(oldtype);`
`41`	`42`	`*newtype = oldtype;`
`42`	`43`	`return OMPI_SUCCESS;`
`43`	`44`	`}`