diff options
author | Bill Wendling <wendling@ncsa.uiuc.edu> | 2003-10-22 21:03:34 (GMT) |
---|---|---|
committer | Bill Wendling <wendling@ncsa.uiuc.edu> | 2003-10-22 21:03:34 (GMT) |
commit | 68fed88177a131ec9bb3a7b2a7117f6c4bcf96e2 (patch) | |
tree | 898d68b3e84c8b6e05a051f587874eff57c492a1 /src/H5FP.c | |
parent | ecf3e6dc45fa3d2a41daf937f19f8ab5dd1ad421 (diff) | |
download | hdf5-68fed88177a131ec9bb3a7b2a7117f6c4bcf96e2.zip hdf5-68fed88177a131ec9bb3a7b2a7117f6c4bcf96e2.tar.gz hdf5-68fed88177a131ec9bb3a7b2a7117f6c4bcf96e2.tar.bz2 |
[svn-r7697] Purpose:
Bug Fix
Description:
Was using HGOTO_ERROR within a "done:" block.
Solution:
Changed HGOTO_ERROR macro to HDONE_ERROR inside of a done: block.
Platforms tested:
Linux (Small change).
Misc. update:
Diffstat (limited to 'src/H5FP.c')
-rw-r--r-- | src/H5FP.c | 14 |
1 files changed, 7 insertions, 7 deletions
@@ -150,32 +150,32 @@ done: /* we've encountered an error...clean up */ if (H5FP_request != MPI_DATATYPE_NULL) if (MPI_Type_free(&H5FP_request) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); if (H5FP_reply != MPI_DATATYPE_NULL) if (MPI_Type_free(&H5FP_reply) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); if (H5FP_read != MPI_DATATYPE_NULL) if (MPI_Type_free(&H5FP_read) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); if (H5FP_alloc != MPI_DATATYPE_NULL) if (MPI_Type_free(&H5FP_alloc) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); if (H5FP_super != MPI_DATATYPE_NULL) if (MPI_Type_free(&H5FP_super) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Type_free failed"); if (H5FP_SAP_BARRIER_COMM != MPI_COMM_NULL) /* this comm will be NULL for the SAP */ if (MPI_Comm_free(&H5FP_SAP_BARRIER_COMM) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Comm_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Comm_free failed"); if (H5FP_SAP_COMM != MPI_COMM_NULL) if (MPI_Comm_free(&H5FP_SAP_COMM) != MPI_SUCCESS) - HGOTO_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Comm_free failed"); + HDONE_ERROR(H5E_INTERNAL, H5E_MPI, FAIL, "MPI_Comm_free failed"); } if (sap_group != MPI_GROUP_NULL) |