[svn-r22133] Description: fixed problem with closing a non-existing file id.

Tested: koala (gnu 4.1)
This commit is contained in:
Scot Breitenfeld 2012-03-23 09:25:05 -05:00
parent 38a1ea7b99
commit 3682dd9ae0

View File

@ -1561,7 +1561,7 @@ SUBROUTINE test_attributes()
!!$ STOP
!!$ ENDIF
CALL h5fclose_f(file_id1, errcode)
!!$ CALL h5fclose_f(file_id1, errcode)
CALL passed()