summaryrefslogtreecommitdiffstats
path: root/hl
diff options
context:
space:
mode:
authorDana Robinson <derobins@hdfgroup.org>2016-03-08 07:34:43 (GMT)
committerDana Robinson <derobins@hdfgroup.org>2016-03-08 07:34:43 (GMT)
commit1b7b09b08104f05a65a0269c5c88a342dba8e972 (patch)
treee758e40e37fa8f8bcd8dc63c57b4d2fb3dac473c /hl
parenta1035bd80624807b3ed31a67575a68f577c0e48c (diff)
downloadhdf5-1b7b09b08104f05a65a0269c5c88a342dba8e972.zip
hdf5-1b7b09b08104f05a65a0269c5c88a342dba8e972.tar.gz
hdf5-1b7b09b08104f05a65a0269c5c88a342dba8e972.tar.bz2
[svn-r29337] Cleaning warnings in Fortran code.
Tested on: 64-bit Ubuntu 15.10 (Linux 4.2.0 x86_64) gcc 5.2.1 autotools serial w/ Fortran
Diffstat (limited to 'hl')
-rw-r--r--hl/fortran/test/tstlite.F902
1 files changed, 0 insertions, 2 deletions
diff --git a/hl/fortran/test/tstlite.F90 b/hl/fortran/test/tstlite.F90
index 0ba7815..081e61e 100644
--- a/hl/fortran/test/tstlite.F90
+++ b/hl/fortran/test/tstlite.F90
@@ -418,7 +418,6 @@ SUBROUTINE test_dataset3D()
#if H5_HAVE_Fortran_INTEGER_SIZEOF_16!=0
INTEGER, PARAMETER :: int_kind_32 = SELECTED_INT_KIND(36) !should map to INTEGER*16 on most modern processors
INTEGER(int_kind_32), DIMENSION(DIM1,DIM2,DIM3), TARGET :: dset_data_i32, data_out_i32
- INTEGER(HID_T) :: dset_id32 ! Dataset identifier
CHARACTER(LEN=7), PARAMETER :: dsetname16a = "dset16a" ! Dataset name
CHARACTER(LEN=7), PARAMETER :: dsetname16b = "dset16b" ! Dataset name
CHARACTER(LEN=7), PARAMETER :: dsetname16c = "dset16c" ! Dataset name
@@ -760,7 +759,6 @@ SUBROUTINE test_datasetND(rank)
INTEGER :: type_class
INTEGER(SIZE_T) :: type_size
CHARACTER(LEN=1) :: ichr1
- CHARACTER(LEN=3) :: ichr3
TYPE(C_PTR) :: f_ptr
INTEGER(HID_T) :: type_id