removed unregistering native vol

This commit is contained in:
M. Scot Breitenfeld
2019-06-13 09:56:50 -05:00
parent 46a62130fa
commit c348d7d606

View File

@@ -93,10 +93,6 @@ CONTAINS
CALL H5VLclose_f(vol_id_out, error)
CALL check("H5VLclose_f",error, total_error)
! Unregister the connector
CALL H5VLunregister_connector_f(vol_id, error)
CALL check("H5VLunregister_connector_f", error, total_error)
END SUBROUTINE test_registration_by_name
!-------------------------------------------------------------------------
@@ -132,10 +128,6 @@ CONTAINS
CALL check("H5VLis_connector_registered_f",error,total_error)
CALL VERIFY("H5VLis_connector_registered_f", is_registered, .TRUE., total_error)
! Unregister the connector
CALL H5VLunregister_connector_f(vol_id, error)
CALL check("H5VLunregister_connector_f", error, total_error)
END SUBROUTINE test_registration_by_value
@@ -216,10 +208,6 @@ CONTAINS
CALL H5VLclose_f(vol_id, error)
CALL check("H5VLclose_f",error, total_error)
! Unregister the connector
CALL H5VLunregister_connector_f(vol_id, error)
CALL check("H5VLunregister_connector_f", error, total_error)
CALL H5Fclose_f(file_id, error)
CALL check("H5Fclose_f",error,total_error)