finalize_int32_1D Subroutine

private pure subroutine finalize_int32_1D(this)

@brief Deallocate the resource.

Type Bound

buffer_int32_1D_t

Arguments

Type IntentOptional Attributes Name
class(buffer_int32_1D_t), intent(inout) :: this

Contents

Source Code


Source Code

    pure subroutine finalize_int32_1D (this)
        class(buffer_int32_1D_t), intent(inout) :: this

        if (allocated(this%buf)) deallocate(this%buf)
    end subroutine finalize_int32_1D