tracks/fsharp/generators/Common.fs in trackler-2.2.1.51 vs tracks/fsharp/generators/Common.fs in trackler-2.2.1.52

- old
+ new

@@ -55,9 +55,19 @@ match value with | :? int64 as i -> if i < 0L then None else Some value | :? int32 as i -> if i < 0 then None else Some value | _ -> None + let ofNonFalse (value: obj) = + match value with + | :? bool as b when not b -> None + | _ -> Some value + + let ofNonError (value: obj) = + match value with + | :? JToken as jToken when not (isNull jToken.["error"]) -> None + | _ -> Some value + module String = open Humanizer let equals (x: string) (y: string) = String.Equals(x, y, StringComparison.OrdinalIgnoreCase) \ No newline at end of file