[automated] Merge branch 'main' => 'release/dev17.14' (#18415)

* update devcontainer sdk (#18412)

* deal with hanging test (#18411)

* typo (#18413)

---------

Co-authored-by: Martin <29605222+Martin521@users.noreply.github.com>
Co-authored-by: Jakub Majocha <1760221+majocha@users.noreply.github.com>
Co-authored-by: Kevin Ransom (msft) <codecutter@hotmail.com>

Author: 4 people

.devcontainer/devcontainer.json

@@ -1,7 +1,7 @@
 // For format details, see https://aka.ms/vscode-remote/devcontainer.json or this file's README at:
 {
     "name": "F#",
-    "image": "mcr.microsoft.com/dotnet/sdk:9.0.200",
+    "image": "mcr.microsoft.com/dotnet/sdk:9.0.202",
     "features": {
         "ghcr.io/devcontainers/features/common-utils:2.5.2": {},
         "ghcr.io/devcontainers/features/git:1.3.2": {},

tests/FSharp.Compiler.ComponentTests/CompilerService/AsyncMemoize.fs

@@ -430,7 +430,7 @@ let ``Cancel running jobs with the same key`` () =
     let current = eventsWhen events (received Requested)
     Assert.Equal(0, current |> countOf Canceled)
 
-    waitUntil events (countOf Canceled >> (=) 10)
+    // waitUntil events (countOf Canceled >> (=) 10)
 
     waitUntil events (received Started)
 
@@ -442,6 +442,7 @@ let ``Cancel running jobs with the same key`` () =
 
     Assert.Equal(0, events |> countOf Failed)
 
+    // All outdated jobs should have been canceled by now.
     Assert.Equal(10, events |> countOf Canceled)
 
     Assert.Equal(1, events |> countOf Finished)

vsintegration/src/FSharp.Editor/Common/Extensions.fs

@@ -97,10 +97,10 @@ type ConnectionPointSubscription = System.IDisposable option
 
 // Usage example:
 //  If a handler is None, to not handle that event
-//  let subscription = subscribeToTextViewEvents (textView, onChangeCaretHandler, onKillFocus, OnSetFocus)
+//  let subscription = subscribeToTextViewEvents (textView, onChangeCaretHandler, onKillFocus, onSetFocus)
 //  Unsubscribe using subscription.Dispose()
-let subscribeToTextViewEvents (textView: IVsTextView, onChangeCaretHandler, onKillFocus, OnSetFocus) : ConnectionPointSubscription =
-    let handler = TextViewEventsHandler(onChangeCaretHandler, onKillFocus, OnSetFocus)
+let subscribeToTextViewEvents (textView: IVsTextView, onChangeCaretHandler, onKillFocus, onSetFocus) : ConnectionPointSubscription =
+    let handler = TextViewEventsHandler(onChangeCaretHandler, onKillFocus, onSetFocus)
 
     match textView with
     | :? IConnectionPointContainer as cpContainer ->