diff --git a/release-notes.txt b/release-notes.txt index 9e3c0bf9..a5a2d9fb 100644 --- a/release-notes.txt +++ b/release-notes.txt @@ -7,6 +7,9 @@ Release notes: - adds AsyncSeq vs TaskSeq comparison chart, #131 - removes release-notes.txt from file dependencies, but keep in the package, #138 +0.3.1 (unreleased) + - fixes not calling Dispose for 'use!', 'use', or `finally` blocks in `try`...`finally` #157 + 0.3.0 - internal renames, improved doc comments, signature files for complex types, hide internal-only types, fixes #112. - adds support for static TaskLike, allowing the same let! and do! overloads that F# task supports, fixes #110. diff --git a/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs b/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs index dbb4b06d..67107111 100644 --- a/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs +++ b/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs @@ -79,9 +79,8 @@ type TaskSeqStateMachineData<'T>() = member data.PushDispose(disposer: unit -> Task) = if isNull data.disposalStack then - data.disposalStack <- null - - //data.disposalStack.Add disposer + data.disposalStack <- ResizeArray() + data.disposalStack.Add disposer member data.PopDispose() = if not (isNull data.disposalStack) then