Skip to content

Commit bbedb57

Browse files
author
brtnfld
committed
missing declaration
1 parent 0f41686 commit bbedb57

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

fortran/src/H5_ff.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -377,6 +377,7 @@ INTEGER(HID_T) FUNCTION h5kind_to_type(ikind, flag) RESULT(h5_type)
377377
INTEGER, INTENT(IN) :: ikind
378378
INTEGER, INTENT(IN) :: flag
379379
#if H5_HAVE_Fortran_INTEGER_SIZEOF_16!=0
380+
INTEGER :: Fortran_INTEGER_16
380381
Fortran_INTEGER_16=SELECTED_INT_KIND(36) !should map to INTEGER*16 on most modern processors
381382
#endif
382383

0 commit comments

Comments
 (0)