Assignment operator for json_core = json_core. This will duplicate the json_core and also perform a deep copy of the json_value data structure.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(json_file), | intent(out) | :: | me | |||
| type(json_file), | intent(in) | :: | f |
subroutine assign_json_file(me,f)
implicit none
class(json_file),intent(out) :: me
type(json_file),intent(in) :: f
me%core = f%core ! no pointers here so OK to copy
call me%core%clone(f%p,me%p)
end subroutine assign_json_file