diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-05-28 16:53:15 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-05-28 16:53:15 (GMT) |
| commit | 52e5579fbae41ee79f91eaeb66d452e8b1cc9e09 (patch) | |
| tree | 0d3fa5ff4f7a4e89b9f469de821377f2fa8482f7 /fortran/src/H5test_kind.F90 | |
| parent | 0560c11c20476a8c99316bd88f1b6924afa057f9 (diff) | |
| download | hdf5-52e5579fbae41ee79f91eaeb66d452e8b1cc9e09.zip hdf5-52e5579fbae41ee79f91eaeb66d452e8b1cc9e09.tar.gz hdf5-52e5579fbae41ee79f91eaeb66d452e8b1cc9e09.tar.bz2 | |
[svn-r27122] removed dependency on generatored fortran source code
Diffstat (limited to 'fortran/src/H5test_kind.F90')
| -rw-r--r-- | fortran/src/H5test_kind.F90 | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/fortran/src/H5test_kind.F90 b/fortran/src/H5test_kind.F90 index 7c5a6d6..018e603 100644 --- a/fortran/src/H5test_kind.F90 +++ b/fortran/src/H5test_kind.F90 @@ -117,6 +117,8 @@ PROGRAM test_kind ENDIF ENDDO + GOTO 10 + ! Generate program information: WRITE(*,'(40(A,/))') & @@ -312,6 +314,7 @@ WRITE(*,'(40(A,/))') & WRITE(*,*) "END PROGRAM H5test_kind" +10 CONTINUE ! (c) Generate Fortran H5* interfaces having multiple KIND interfaces. ! |