Alternate version of initialize_json_file_from_string_v2, where “str” is kind=CDK.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(kind=CDK,len=*), | intent(in) | :: | str | string to load JSON data from |
||
type(json_core), | intent(in) | :: | json_core_object |
function wrap_initialize_json_file_from_string_v2(str,json_core_object) &
result(file_object)
implicit none
type(json_file) :: file_object
character(kind=CDK,len=*),intent(in) :: str !! string to load JSON data from
type(json_core),intent(in) :: json_core_object
file_object = initialize_json_file_from_string_v2(to_unicode(str),json_core_object)
end function wrap_initialize_json_file_from_string_v2