- fix the delete priority of the ompio component

- some application use MPI_File_delete as a collective function (e.g. IOR), which I think is not really covered by the standard. Right now, one process succeeds and theother ones return an error code. Fix that by not returning no error if the file that we try to delete does not exist anymore, to make these applications work.

Author: edgargabriel

ompi/mca/io/ompio/io_ompio_component.c

@@ -136,7 +136,7 @@ static int register_component(void)
                                            OPAL_INFO_LVL_9,
                                            MCA_BASE_VAR_SCOPE_READONLY,
                                            &priority_param);
-    delete_priority_param = 10;
+    delete_priority_param = 30;
     (void) mca_base_component_var_register(&mca_io_ompio_component.io_version,
                                            "delete_priority", "Delete priority of the io ompio component",
                                            MCA_BASE_VAR_TYPE_INT, NULL, 0, 0,

ompi/mca/io/ompio/io_ompio_file_open.c

@@ -394,8 +394,9 @@ int mca_io_ompio_file_delete (char *filename,
 
     ret = unlink(filename);
 
-    if (0 > ret) {
-        return OMPI_ERROR;
+    if (0 > ret && ENOENT != errno ) {
+	opal_output (1, "errno = %d %s\n", errno, strerror(errno));
+        return MPI_ERR_ACCESS;
     }
 
     return OMPI_SUCCESS;