diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2017-05-25 18:20:55 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2017-05-25 18:20:55 (GMT) |
| commit | 53ab586c4ec7fe8b829ff405217929243ef31f1e (patch) | |
| tree | 8bbca9bb9efd788a73493b91aed7c2007b0fbbf1 /fortran | |
| parent | 6a230585f0380503db2280db0ba069c639bb6103 (diff) | |
| parent | 133168d8fcd5210c66d65ba3c1b349f72fd39f0f (diff) | |
| download | hdf5-53ab586c4ec7fe8b829ff405217929243ef31f1e.zip hdf5-53ab586c4ec7fe8b829ff405217929243ef31f1e.tar.gz hdf5-53ab586c4ec7fe8b829ff405217929243ef31f1e.tar.bz2 | |
Merge pull request #533 in HDFFV/hdf5 from ~BRTNFLD/hdf5_msb:hdf5_1_8 to hdf5_1_8
* commit '133168d8fcd5210c66d65ba3c1b349f72fd39f0f':
Fixed for building shared fortran libraries on OS X, HDFFV-2772
fixed print formatting
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/test/fortranlib_test.f90 | 6 | ||||
| -rw-r--r-- | fortran/test/fortranlib_test_1_8.f90 | 6 | ||||
| -rw-r--r-- | fortran/test/fortranlib_test_F03.f90 | 6 |
3 files changed, 9 insertions, 9 deletions
diff --git a/fortran/test/fortranlib_test.f90 b/fortran/test/fortranlib_test.f90 index 79ff161..e4e2fbf 100644 --- a/fortran/test/fortranlib_test.f90 +++ b/fortran/test/fortranlib_test.f90 @@ -50,11 +50,11 @@ PROGRAM fortranlibtest IF(total_error .EQ. 0) THEN WRITE(*, '(" FORTRANLIB_TEST is linked with HDF5 Library version ")', advance="NO") - WRITE(*, '(I1)', advance="NO") majnum + WRITE(*, '(I0)', advance="NO") majnum WRITE(*, '(".")', advance="NO") - WRITE(*, '(I1)', advance="NO") minnum + WRITE(*, '(I0)', advance="NO") minnum WRITE(*, '(" release ")', advance="NO") - WRITE(*, '(I3)') relnum + WRITE(*, '(I0)') relnum ELSE total_error = total_error + 1 ENDIF diff --git a/fortran/test/fortranlib_test_1_8.f90 b/fortran/test/fortranlib_test_1_8.f90 index 320d661..1cbea1d 100644 --- a/fortran/test/fortranlib_test_1_8.f90 +++ b/fortran/test/fortranlib_test_1_8.f90 @@ -48,11 +48,11 @@ PROGRAM fortranlibtest CALL h5get_libversion_f(majnum, minnum, relnum, total_error) IF(total_error .EQ. 0) THEN WRITE(*, '(" FORTRANLIB_TEST is linked with HDF5 Library version ")', advance="NO") - WRITE(*, '(I1)', advance="NO") majnum + WRITE(*, '(I0)', advance="NO") majnum WRITE(*, '(".")', advance="NO") - WRITE(*, '(I1)', advance="NO") minnum + WRITE(*, '(I0)', advance="NO") minnum WRITE(*, '(" release ")', advance="NO") - WRITE(*, '(I3)') relnum + WRITE(*, '(I0)') relnum ELSE total_error = total_error + 1 ENDIF diff --git a/fortran/test/fortranlib_test_F03.f90 b/fortran/test/fortranlib_test_F03.f90 index 1b8cf97..722d431 100644 --- a/fortran/test/fortranlib_test_F03.f90 +++ b/fortran/test/fortranlib_test_F03.f90 @@ -49,11 +49,11 @@ PROGRAM fortranlibtest_F03 CALL h5get_libversion_f(majnum, minnum, relnum, total_error) IF(total_error .EQ. 0) THEN WRITE(*, '(" FORTRANLIB_TEST is linked with HDF5 Library version ")', advance="NO") - WRITE(*, '(I1)', advance="NO") majnum + WRITE(*, '(I0)', advance="NO") majnum WRITE(*, '(".")', advance="NO") - WRITE(*, '(I1)', advance="NO") minnum + WRITE(*, '(I0)', advance="NO") minnum WRITE(*, '(" release ")', advance="NO") - WRITE(*, '(I3)') relnum + WRITE(*, '(I0)') relnum ELSE total_error = total_error + 1 ENDIF |