Add overload to simplify matching in F#

OrleansContrib · Dec 6, 2019 · f5e581e · f5e581e
1 parent 6419439
commit f5e581e
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 1 deletion.
diff --git a/Samples/FSharp/Reentrant/RealTimeCounter.fs b/Samples/FSharp/Reentrant/RealTimeCounter.fs
@@ -45,4  45,7 @@ type Counter() =
         | _ -> return unhandled()
     }
 
-    static member IsReentrant(req:InvokeMethodRequest) = req.Message(fun x -> x > GetCount)
     static member IsReentrant(req:InvokeMethodRequest) = req.Message(fun x -> 
         match x with 
         | GetCount -> true 
         | _ -> false)
diff --git a/Source/Orleankka.Runtime/InvokeMethodRequestExtensions.cs b/Source/Orleankka.Runtime/InvokeMethodRequestExtensions.cs
@@ -10,6  10,9 @@ public static class InvokeMethodRequestExtensions
         public static bool Message(this InvokeMethodRequest request, Func<object, bool> predicate) => 
             predicate(request.Message());
 
         public static bool Message<T>(this InvokeMethodRequest request, Func<T, bool> predicate) => 
             request.Message() is T m && predicate(m);
 
         public static object Message(this InvokeMethodRequest request)
         {
             if (request?.Arguments == null)