Permalink
Browse files

Fix compilation errors in control.fs

  • Loading branch information...
1 parent 26f722a commit b41ad1a8deabfb5ce40db5e62381eac26524b6af @ovatsus ovatsus committed Feb 18, 2013
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/fsharp/FSharp.Core/control.fs
View
2 src/fsharp/FSharp.Core/control.fs
@@ -1497,7 +1497,7 @@ namespace Microsoft.FSharp.Control
Async.Start (async { do (ccont e |> unfake) })
// register cancellation handler
- let registration = aux.token.Register(fun () -> cancel (OperationCanceledException()))
+ let registration = aux.token.Register((fun _ -> cancel (OperationCanceledException())), null)
// run actual await routine
// callback will be executed on the thread pool so we need to use TrampolineHolder.Protect to install trampoline

0 comments on commit b41ad1a

Please sign in to comment.