json_value_create_object Subroutine

private subroutine json_value_create_object(me, name)

Arguments

Type IntentOptional AttributesName
type(json_value), , pointer:: me
character(kind=CK,len=*), intent(in) :: name

Description

Allocate a json_value pointer and make it an object variable. The pointer should not already be allocated.

Example

     type(json_value),pointer :: p
     call json_create(p,'objectname')

Calls

proc~~json_value_create_object~~CallsGraph proc~json_value_create_object json_value_create_object proc~json_value_create json_value_create proc~json_value_create_object->proc~json_value_create proc~to_object to_object proc~json_value_create_object->proc~to_object proc~destroy_json_data destroy_json_data proc~to_object->proc~destroy_json_data
Help

Called By

proc~~json_value_create_object~~CalledByGraph proc~json_value_create_object json_value_create_object proc~wrap_json_value_create_object wrap_json_value_create_object proc~wrap_json_value_create_object->proc~json_value_create_object interface~json_create_object json_create_object interface~json_create_object->proc~json_value_create_object proc~test_7 test_7 proc~test_7->interface~json_create_object proc~test_2 test_2 proc~test_2->interface~json_create_object proc~add_variables_to_input add_variables_to_input proc~test_2->proc~add_variables_to_input proc~test_12 test_12 proc~test_12->interface~json_create_object proc~add_variables_to_input->interface~json_create_object proc~test_4 test_4 proc~test_4->interface~json_create_object proc~test_10 test_10 proc~test_10->interface~json_create_object program~jf_test_7 jf_test_7 program~jf_test_7->proc~test_7 program~jf_test_2 jf_test_2 program~jf_test_2->proc~test_2 program~jf_test_12 jf_test_12 program~jf_test_12->proc~test_12 program~jf_test_4 jf_test_4 program~jf_test_4->proc~test_4 program~jf_test_10 jf_test_10 program~jf_test_10->proc~test_10
Help

Source Code

    subroutine json_value_create_object(me,name)

    implicit none

    type(json_value),pointer            :: me
    character(kind=CK,len=*),intent(in) :: name

    call json_value_create(me)
    call to_object(me,name)

    end subroutine json_value_create_object