Destruct TestRealVal object by deallocating its next object pointer.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(TestRealVal), | intent(inout) | :: | self |
subroutine deleteTestRealVal(self)
!! Destruct TestRealVal object by deallocating its next object pointer.
type(TestRealVal), intent(inout) :: self
deallocate(self%next)
end subroutine deleteTestRealVal