Release 3.0.0-rc.15

Author: bartelink

Directory.Build.props

@@ -17,8 +17,8 @@
     <!-- suppress false positive warning FS2003 about invalid version of AssemblyInformationalVersionAttribute -->
     <!-- supress NU5105 triggered by trailing dotted elements such as .43 and .2 in e.g.: pr.43-rc1.2: The package version '<X>' uses SemVer 2.0.0 or components of SemVer 1.0.0 that are not supported on legacy clients. Change the package version to a SemVer 1.0.0 string. If the version contains a release label it must start with a letter. This message can be ignored if the package is not intended for older clients. -->
     <NoWarn>$(NoWarn);FS2003;NU5105</NoWarn>
-<!--    <PinnedBaseVersion Condition=" '$(Configuration)' == 'Release' ">3.0.0-rc.14.3</PinnedBaseVersion>-->
-<!--    <PinnedBaselineRootPackage Condition=" '$(Configuration)' == 'Release' ">[$(PinnedBaseVersion), 4.0.0)</PinnedBaselineRootPackage>-->
+    <PinnedBaseVersion Condition=" '$(Configuration)' == 'Release' ">3.0.0-rc.15</PinnedBaseVersion>
+    <PinnedBaselineRootPackage Condition=" '$(Configuration)' == 'Release' ">[$(PinnedBaseVersion), 4.0.0)</PinnedBaselineRootPackage>
 <!--    <PinnedDynamoStoreRootPackage Condition=" '$(Configuration)' == 'Release' ">[$(PinnedBaseVersion), 4.0.0)</PinnedDynamoStoreRootPackage>-->
   </PropertyGroup>
   <ItemGroup>

src/Propulsion/Propulsion.fsproj

@@ -6,7 +6,7 @@
     <TargetFramework>net6.0</TargetFramework>
     <!-- NOTE FSharp.Core dep is implies by what `FSharp.Control.TaskSeq` dictates; see below -->
     <DisableImplicitFSharpCoreReference>true</DisableImplicitFSharpCoreReference>
-<!--    <PackageValidationBaselineVersion>3.0.0-rc.14.3</PackageValidationBaselineVersion>-->
+<!--    <PackageValidationBaselineVersion>3.0.0-rc.15</PackageValidationBaselineVersion>-->
   </PropertyGroup>
 
   <ItemGroup>

src/Propulsion/Streams.fs

@@ -7,6 +7,7 @@ open System.Collections.Generic
 
 module Log =
 
+    [<NoEquality; NoComparison>]
     type BufferMetric = { cats: int; streams: int; events: int; bytes: int64 }
     [<RequireQualifiedAccess; NoEquality; NoComparison>]
     type Metric =
@@ -487,7 +488,7 @@ module Scheduling =
                 member x.MaxAge = let _, struct (oldest, _) = x.State in oldest
                 member _.TryGet sn = match state.TryGetValue sn with true, v -> ValueSome v.count | _ -> ValueNone
 
-            type [<Struct>] State = Running | Slow of s: int | Failing of c: int | Stuck of c2: int | Waiting
+            type [<Struct; NoEquality; NoComparison>] State = Running | Slow of s: int | Failing of c: int | Stuck of c2: int | Waiting
             /// Collates all state and reactions to manage the list of busy streams based on callbacks/notifications from the Dispatcher
             type Monitor() =
                 let active, failing, stuck = Active(), Repeating(), Repeating()