[Repo Assist] fix: correct Async.bind signature and implementation

[github-actions]

🤖 This is an automated pull request from Repo Assist, an AI assistant.

Summary

Async.bind in Utils.fs had the same bug that Task.bind was fixed for in commit 8486e1b: the binder function received the entire Async<'T> wrapper rather than the awaited inner value 'T.

Root Cause

The previous implementation:

let inlinebind binder (async:Async<'T>):Async<'U>=
ExtraTopLevelOperators.async{return! binder async }

And its corresponding signature:

val inlinebind:binder:(Async<'T>-> Async<'U>) ->async:Async<'T>->Async<'U>

The binder received Async<'T> — effectively making Async.bind equivalent to plain function application (fun binder async -> binder async), not a monadic bind. This was inconsistent with Task.bind which correctly has binder: ('T -> #Task<'U>).

Fix

Both the implementation and the signature have been corrected to standard monadic bind:

let inlinebind binder (async:Async<'T>):Async<'U>=
ExtraTopLevelOperators.async{let!result= async
return! binder result
}

val inlinebind:binder:('T -> Async<'U>) ->async:Async<'T>->Async<'U>

Breaking Change

This changes the public API signature. The previous signature was incorrect and the function was likely never useful as published (any code using it would have needed a fun (asyncT: Async<'T>) -> ... binder rather than the natural fun (t: 'T) -> ... form). A suppression has been added to CompatibilitySuppressions.xml.

Added Tests

Utils.Tests.fs is a new test file covering Async.bind, Task.bind, Async.map, and Task.map — none of which had dedicated tests before.

Test Status

• Build: ✅ dotnet build -c Release — succeeded (0 warnings, 0 errors)
• Tests: ✅ dotnet test -c Release — 5190 passed, 2 skipped (pre-existing infrastructure skips)
• Format: ✅ dotnet fantomas . --check — passed

Generated by 🌈 Repo Assist, see workflow run. Learn more.

To install this agentic workflow, run

gh aw add githubnext/agentics/workflows/repo-assist.md@97143ac59cb3a13ef2a77581f929f06719c7402a

Generated by 🌈 Repo Assist, see workflow run. Learn more.

To install this agentic workflow, run

gh aw add githubnext/agentics/workflows/repo-assist.md@97143ac59cb3a13ef2a77581f929f06719c7402a

[bartelink]

@dsyme Any reason the Async.bind impl can't just call ExtraTopLevelOperators.async.Bind ?
(Seems to work and pass the tests locally)
(Asking as compiling a fslang-suggestion re transplanting some of these helpers)
I can also see the case for having it implemented directly, so let me know if you want/see the point in doing a PR