json_file_traverse Subroutine

private subroutine json_file_traverse(me, traverse_callback)

Traverse the JSON structure in the file. This routine calls the user-specified json_traverse_callback_func for each element of the structure.

Type Bound

json_file

Arguments

Type IntentOptional Attributes Name
class(json_file), intent(inout) :: me
procedure(json_traverse_callback_func) :: traverse_callback

Calls

proc~~json_file_traverse~~CallsGraph proc~json_file_traverse json_file%json_file_traverse proc~json_traverse json_core%json_traverse proc~json_file_traverse->proc~json_traverse none~throw_exception json_core%throw_exception proc~json_traverse->none~throw_exception proc~json_throw_exception json_core%json_throw_exception none~throw_exception->proc~json_throw_exception

Source Code

    subroutine json_file_traverse(me,traverse_callback)

    implicit none

    class(json_file),intent(inout)         :: me
    procedure(json_traverse_callback_func) :: traverse_callback

    call me%core%traverse(me%p,traverse_callback)

    end subroutine json_file_traverse