dealloc Subroutine

private subroutine dealloc(this)

Deallocate all arrays associated with this hash table object

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(shared_rhash_t),	intent(inout)			::	this

Source Code

    subroutine dealloc(this)
        class(shared_rhash_t), intent(inout) :: this

        call this%indices%shared_dealloc()
        call this%hval_offsets%shared_dealloc()
        if (allocated(this%mult)) deallocate(this%mult)
    end subroutine dealloc