on master help sign in
Fix formatting in sendAcksAndClean (move closing paren to new line)
cba8c2eiko
client/obj/Debug/net10.0-maccatalyst/maccatalyst-arm64/Skrepka.AssemblyInfo.fs+1−1
@@ -10,7 +10,7 @@ open System.Reflection
10[<assembly: System.Reflection.AssemblyCompanyAttribute("Skrepka")>]
10[<assembly: System.Reflection.AssemblyCompanyAttribute("Skrepka")>]
11[<assembly: System.Reflection.AssemblyConfigurationAttribute("Debug")>]
11[<assembly: System.Reflection.AssemblyConfigurationAttribute("Debug")>]
12[<assembly: System.Reflection.AssemblyFileVersionAttribute("1.0.0.0")>]
12[<assembly: System.Reflection.AssemblyFileVersionAttribute("1.0.0.0")>]
13−[<assembly: System.Reflection.AssemblyInformationalVersionAttribute("1.0+e5192b2de772542ae399a240271fba3ee7c0e3ca")>]
13+[<assembly: System.Reflection.AssemblyInformationalVersionAttribute("1.0+55073b24cbe7d0ad09d68699068fe1e06cf596df")>]
14[<assembly: System.Reflection.AssemblyProductAttribute("Skrepka")>]
14[<assembly: System.Reflection.AssemblyProductAttribute("Skrepka")>]
15[<assembly: System.Reflection.AssemblyTitleAttribute("Skrepka")>]
15[<assembly: System.Reflection.AssemblyTitleAttribute("Skrepka")>]
16[<assembly: System.Reflection.AssemblyVersionAttribute("1.0.0.0")>]
16[<assembly: System.Reflection.AssemblyVersionAttribute("1.0.0.0")>]
client/obj/Debug/net10.0-maccatalyst/maccatalyst-arm64/Skrepka.AssemblyInfoInputs.cache+1−1
@@ -1 +1 @@
1−d8467ba846d7ed88c0541898cd2c1f66917869d9f94d557eda33bdf279806cc5
1+85baf36b56b7a21d3ed7f05c50f22617d4a1ebc90a8ce25f377d9a5a32f662e1
server.knot+2−1
@@ -559,7 +559,8 @@ sendAcksAndClean = \pendingAcks servers ->
559 a <- ackedIds
559 a <- ackedIds
560 where not (a.originServer == server && count (do sa <- serverAcks; where sa.messageId == a.messageId; where sa.toKey == a.toKey; yield sa) > 0)
560 where not (a.originServer == server && count (do sa <- serverAcks; where sa.messageId == a.messageId; where sa.toKey == a.toKey; yield sa) > 0)
561 yield a
561 yield a
562− Err _ -> yield {})
562+ Err _ -> yield {}
563+ )
563 sendAcksAndClean pendingAcks rest
564 sendAcksAndClean pendingAcks rest
564
565
565pollOnce = \token cursor -> do
566pollOnce = \token cursor -> do