mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-03-01 16:28:09 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r24951] Changed ordering of initiation of variable to remove warnings using sun compilers.

Browse Source 
Tested: emu
This commit is contained in:
Scot Breitenfeld 2014-04-03 09:35:54 -05:00
parent 6739a7f7ac
commit b87b1c965d
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fortran/test/fortranlib_test.f90
View File

@ -72,10 +72,10 @@ PROGRAM fortranlibtest
CALL reopentest(cleanup, ret_total_error)
CALL write_test_status(ret_total_error, ' Reopen test', total_error)
ret_total_error = 0
!DEC$ if defined(H5_VMS)
GOTO 8
!DEC$ else
ret_total_error = 0
CALL file_close(cleanup, ret_total_error)
CALL write_test_status(ret_total_error, ' File open/close test', total_error)
!DEC$ endif
@ -179,10 +179,10 @@ PROGRAM fortranlibtest
CALL external_test(cleanup, ret_total_error)
CALL write_test_status(ret_total_error, ' External dataset test', total_error)
ret_total_error = 0
!DEC$ if defined(H5_VMS)
GOTO 9
!DEC$ else
ret_total_error = 0
CALL multi_file_test(cleanup, ret_total_error)
CALL write_test_status(ret_total_error, ' Multi file driver test', total_error)
!DEC$ endif