From 79ae985190978b664355eeb2bf6f75f8644d613d Mon Sep 17 00:00:00 2001
From: Abel Braaksma <abel.online@xs4all.nl>
Date: Sun, 5 Nov 2023 17:16:57 +0100
Subject: [PATCH] Removes deprecation warnings of now-obsoleted functions

---
 src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs b/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs
index 94af1b8b..ced53d8e 100644
--- a/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs
+++ b/src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs
@@ -291,18 +291,18 @@ and [<NoComparison; NoEquality>] TaskSeq<'Machine, 'T
                 // the Current value
                 data.current <- ValueNone
 
-            ValueTask.FromResult result
+            ValueTask.fromResult result
 
         | ValueTaskSourceStatus.Faulted
         | ValueTaskSourceStatus.Canceled
         | ValueTaskSourceStatus.Pending as state ->
             Debug.logInfo ("at MoveNextAsyncResult: case ", state)
 
-            ValueTask.ofIValueTaskSource this version
+            ValueTask.ofSource this version
         | _ ->
             Debug.logInfo "at MoveNextAsyncResult: Unexpected state"
             // assume it's a possibly new, not yet supported case, treat as default
-            ValueTask.ofIValueTaskSource this version
+            ValueTask.ofSource this version
 
 and ResumableTSC<'T> = ResumableCode<TaskSeqStateMachineData<'T>, unit>
 and TaskSeqStateMachine<'T> = ResumableStateMachine<TaskSeqStateMachineData<'T>>