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.

Arguments

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

Contents

Source Code


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