json_value_create Subroutine

private subroutine json_value_create(p)

Allocate a json_value pointer variable. This should be called before adding data to it.

Example

    type(json_value),pointer :: var
    call json_value_create(var)
    call json%to_double(var,1.0_RK)

Notes

  1. This routine does not check for exceptions.
  2. The pointer should not already be allocated, or a memory leak will occur.

Arguments

Type IntentOptional AttributesName
type(json_value), pointer:: p

Called by

proc~~json_value_create~~CalledByGraph proc~json_value_create json_value_create proc~json_value_create_array json_value_create_array proc~json_value_create_array->proc~json_value_create proc~json_value_create_logical json_value_create_logical proc~json_value_create_logical->proc~json_value_create proc~json_get_by_path_jsonpath_bracket json_get_by_path_jsonpath_bracket proc~json_get_by_path_jsonpath_bracket->proc~json_value_create proc~json_value_create_integer json_value_create_integer proc~json_value_create_integer->proc~json_value_create proc~json_parse_file json_parse_file proc~json_parse_file->proc~json_value_create proc~json_value_create_string json_value_create_string proc~json_value_create_string->proc~json_value_create proc~json_value_create_null json_value_create_null proc~json_value_create_null->proc~json_value_create proc~json_parse_string json_parse_string proc~json_parse_string->proc~json_value_create proc~json_value_create_object json_value_create_object proc~json_value_create_object->proc~json_value_create proc~parse_array parse_array proc~parse_array->proc~json_value_create proc~parse_object parse_object proc~parse_object->proc~json_value_create proc~json_get_by_path_default json_get_by_path_default proc~json_get_by_path_default->proc~json_value_create proc~json_value_create_double json_value_create_double proc~json_value_create_double->proc~json_value_create

Contents

Source Code


Source Code

    subroutine json_value_create(p)

    implicit none

    type(json_value),pointer :: p

    nullify(p)
    allocate(p)

    end subroutine json_value_create