Added wantSome and wantNone test helpers

Author: xperiandri

tests/FSharp.Data.GraphQL.Tests/Helpers.fs

@@ -19,6 +19,10 @@ let isSeq<'a> actual = isType<'a seq> actual
 let isDict<'k, 'v> actual = isSeq<KeyValuePair<'k, 'v>> actual
 let isNameValueDict actual = isDict<string, obj> actual
 let fail (message: string) = Assert.Fail message
+let wantSome opt = match opt with | Some value -> value | None -> fail "Expected Some but got None"; Unchecked.defaultof<_>
+let wantNone opt = match opt with | None -> () | Some _ -> fail "Expected None but got Some"
+let wantValueSome opt = match opt with | ValueSome value -> value | _ -> fail "Expected ValueSome but got ValueNone"; Unchecked.defaultof<_>
+let wantValueNone opt = match opt with | ValueNone -> () | _ -> fail "Expected ValueNone but got ValueSome"
 let equals (expected : 'x) (actual : 'x) =
     if not (actual = expected) then fail <| $"expected %A{expected}\nbut got %A{actual}"
 let notEquals (expected : 'x) (actual : 'x) =