Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=BLOCK_SIZE), | public | :: | chars | ||||
integer, | public | :: | index | = | 0 | ||
type(fson_string), | public, | pointer | :: | next | => | null() |
type fson_string
character (len = BLOCK_SIZE) :: chars
integer :: index = 0
type(fson_string), pointer :: next => null()
end type fson_string