Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(fson_string), | public, | pointer | :: | name | => | null() | |
integer, | public | :: | value_type | = | TYPE_UNKNOWN | ||
logical, | public | :: | value_logical | ||||
integer, | public | :: | value_integer | ||||
real, | public | :: | value_real | ||||
real(kind=kind(1.0D0)), | public | :: | value_double | ||||
type(fson_string), | public, | pointer | :: | value_string | => | null() | |
type(fson_value), | public, | pointer | :: | next | => | null() | |
type(fson_value), | public, | pointer | :: | parent | => | null() | |
type(fson_value), | public, | pointer | :: | children | => | null() |
type fson_value
type(fson_string), pointer :: name => null()
integer :: value_type = TYPE_UNKNOWN
logical :: value_logical
integer :: value_integer
real :: value_real
!+PJK
real(kind(1.0D0)) :: value_double
!-PJK
type(fson_string), pointer :: value_string => null()
type(fson_value), pointer :: next => null()
type(fson_value), pointer :: parent => null()
type(fson_value), pointer :: children => null()
end type fson_value