diff options
Diffstat (limited to 'fortran/examples/compound.f90')
| -rw-r--r-- | fortran/examples/compound.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/examples/compound.f90 b/fortran/examples/compound.f90 index 0bb6672..0ef22e6 100644 --- a/fortran/examples/compound.f90 +++ b/fortran/examples/compound.f90 @@ -42,8 +42,8 @@ INTEGER(SIZE_T) :: type_sized ! Size of the double precision datatype INTEGER(SIZE_T) :: type_sizer ! Size of the real datatype INTEGER(SIZE_T) :: offset ! Member's offset - CHARACTER*2, DIMENSION(dimsize) :: char_member - CHARACTER*2, DIMENSION(dimsize) :: char_member_out ! Buffer to read data out + CHARACTER(LEN=2), DIMENSION(dimsize) :: char_member + CHARACTER(LEN=2), DIMENSION(dimsize) :: char_member_out ! Buffer to read data out INTEGER, DIMENSION(dimsize) :: int_member DOUBLE PRECISION, DIMENSION(dimsize) :: double_member REAL, DIMENSION(dimsize) :: real_member |