core
/
eccodes
mirror of https://github.com/ecmwf/eccodes.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

ECC-601: Fortran interface: argument to codes_set_string_array does not need to be ALLOCATABLE

This commit is contained in:
Shahram Najm 2017-12-13 15:26:53 +00:00
parent 4b9233bd3f
commit 1f0a597912
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fortran/eccodes_f90_tail.f90
View File

@ -1817,10 +1817,10 @@ end subroutine codes_bufr_copy_data
!> @param value string array value
!> @param status CODES_SUCCESS if OK, integer value on error
subroutine codes_set_string_array ( msgid, key, value, status )
integer(kind=kindOfInt), intent(in) :: msgid
character(len=*), intent(in) :: key
character(len=*), dimension(:),allocatable, intent(in) :: value
integer(kind=kindOfInt),optional, intent(out) :: status
integer(kind=kindOfInt), intent(in) :: msgid
character(len=*), intent(in) :: key
character(len=*), dimension(:), intent(in) :: value
integer(kind=kindOfInt),optional, intent(out) :: status
character :: cvalue(size(value)*len(value(0)))
character :: svalue(len(value(0)))