summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAlbert Cheng <acheng@hdfgroup.org>2014-04-09 01:08:08 (GMT)
committerAlbert Cheng <acheng@hdfgroup.org>2014-04-09 01:08:08 (GMT)
commitaaf5c1d4003f6825b6df37390bd5b88053be0f31 (patch)
tree208dbcca2c41e591ca3f99f320205ac41d1c15da
parentae846315702f9b038c3c0ed7c6d565f179d45a05 (diff)
downloadhdf5-aaf5c1d4003f6825b6df37390bd5b88053be0f31.zip
hdf5-aaf5c1d4003f6825b6df37390bd5b88053be0f31.tar.gz
hdf5-aaf5c1d4003f6825b6df37390bd5b88053be0f31.tar.bz2
[svn-r24989] Problem:
AIX compiler complains that: ex_ds1.f90, line 89.16: 1512-050 (W) Field separator is missing, in literal FMT specifier, after edit descriptor X. A comma is assumed. Line 89: WRITE(*,'(/,5X 3(A,1X),I0,A,L1)') 'Is',TRIM(DS_1_NAME),& Solution: Added the missing comma after "5X". Tested: AIX system.
-rw-r--r--hl/fortran/examples/ex_ds1.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/hl/fortran/examples/ex_ds1.f90 b/hl/fortran/examples/ex_ds1.f90
index 377a641..d77f8e0 100644
--- a/hl/fortran/examples/ex_ds1.f90
+++ b/hl/fortran/examples/ex_ds1.f90
@@ -86,7 +86,7 @@ PROGRAM example_ds
! Test if dimension Scale Attached
CALL H5DSis_attached_f(did, dsid, DIM1, is_attached, err)
- WRITE(*,'(/,5X 3(A,1X),I0,A,L1)') 'Is',TRIM(DS_1_NAME),&
+ WRITE(*,'(/,5X,3(A,1X),I0,A,L1)') 'Is',TRIM(DS_1_NAME),&
'attached to dimension',DIM1,' ... ',is_attached