json_file_failed Function

private pure function json_file_failed(me) result(failed)

Check error status in the file.

Arguments

Type IntentOptional AttributesName
class(json_file), intent(in) :: me

Return Value logical(kind=LK)

will be true if there has been an error.


Contents

Source Code


Source Code

    pure function json_file_failed(me) result(failed)

    implicit none

    class(json_file),intent(in) :: me
    logical(LK)                 :: failed  !! will be true if there has been an error.

    failed = me%core%failed()

    end function json_file_failed