diff options
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. ! |