Fortran interface: status argument of keys_iterator_next should not be optional
@@ -1274,7 +1274,7 @@ end subroutine codes_keys_iterator_new
!> @param status CODES_SUCCESS if next iterator exists, integer value if no more elements to iterate on
subroutine codes_keys_iterator_next ( iterid , status)
integer(kind=kindOfInt), intent(in) :: iterid
- integer(kind=kindOfInt),optional, intent(out) :: status
+ integer(kind=kindOfInt), intent(out) :: status
call grib_keys_iterator_next ( iterid , status)
end subroutine codes_keys_iterator_next
@@ -1362,7 +1362,7 @@ end subroutine codes_bufr_keys_iterator_new
!> @param status CODES_SUCCESS if next iterator exists, integer value if no more elements to iterate on
subroutine codes_bufr_keys_iterator_next (iterid , status)
integer(kind=kindOfInt), intent(in) :: iterid
- integer(kind=kindOfInt),optional, intent(out) :: status
+ integer(kind=kindOfInt), intent(out) :: status
integer(kind=kindOfInt) :: iret
status = GRIB_SUCCESS
