rescript-relay 2.0.0 → 3.0.0-alpha.1

package/src/RescriptRelay.resi

@@ -53,7 +53,7 @@ external unwrapUploadables: uploadables => Js.Dict.t<'file> = "%identity"
 
 /**This generates a `dataId` for use on the _client_ side. However, this is farily low level, and what you're probably really looking for is `generateUniqueClientID` that'll let you generate a new, unique `dataId` that you can use for client side only records (like when doing optimistic updates).*/
 @module("relay-runtime")
-external generateClientID: (~dataId: dataId, ~storageKey: string, ~index: int=?, unit) => dataId =
+external generateClientID: (~dataId: dataId, ~storageKey: string, ~index: int=?) => dataId =
   "generateClientID"
 
 /**This generates a unique `dataId` that's safe to use on the _client_ side. Useful when doing optimistic updates and you need to create IDs that the optimistic update can use.*/
@@ -139,16 +139,11 @@ module RecordProxy: {
   /**Gets a single linked record. A linked record is another object in the store, and not a scalar field like an int or float.*/
   @send
   @return(nullable)
-  external getLinkedRecord: (t, ~name: string, ~arguments: arguments=?, unit) => option<t> =
+  external getLinkedRecord: (t, ~name: string, ~arguments: arguments=?) => option<t> =
     "getLinkedRecord"
 
   /**Gets an array of linked records, for when a field is a list (meaning a link to multiple records).*/
-  let getLinkedRecords: (
-    t,
-    ~name: string,
-    ~arguments: arguments=?,
-    unit,
-  ) => option<array<option<t>>>
+  let getLinkedRecords: (t, ~name: string, ~arguments: arguments=?) => option<array<option<t>>>
 
   /**This returns an existing linked record, or creates one at the configured place if one does not already exist.*/
   @send
@@ -157,7 +152,6 @@ module RecordProxy: {
     ~name: string,
     ~typeName: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "getOrCreateLinkedRecord"
 
   /**Returns the `__typename` of this particular record.*/
@@ -167,7 +161,7 @@ module RecordProxy: {
   /**Returns a field value, expecting it to be a string.*/
   @send
   @return(nullable)
-  external getValueString: (t, ~name: string, ~arguments: arguments=?, unit) => option<string> =
+  external getValueString: (t, ~name: string, ~arguments: arguments=?) => option<string> =
     "getValue"
 
   /**Returns a field value, expecting it to be an array of strings.*/
@@ -177,14 +171,12 @@ module RecordProxy: {
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<string>>> = "getValue"
 
   /**Returns a field value, expecting it to be an int.*/
   @send
   @return(nullable)
-  external getValueInt: (t, ~name: string, ~arguments: arguments=?, unit) => option<int> =
-    "getValue"
+  external getValueInt: (t, ~name: string, ~arguments: arguments=?) => option<int> = "getValue"
 
   /**Returns a field value, expecting it to be an array of ints.*/
   @send
@@ -193,14 +185,12 @@ module RecordProxy: {
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<int>>> = "getValue"
 
   /**Returns a field value, expecting it to be a float.*/
   @send
   @return(nullable)
-  external getValueFloat: (t, ~name: string, ~arguments: arguments=?, unit) => option<float> =
-    "getValue"
+  external getValueFloat: (t, ~name: string, ~arguments: arguments=?) => option<float> = "getValue"
 
   /**Returns a field value, expecting it to be an array of floats.*/
   @send
@@ -209,14 +199,12 @@ module RecordProxy: {
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<float>>> = "getValue"
 
   /**Returns a field value, expecting it to be a boolean.*/
   @send
   @return(nullable)
-  external getValueBool: (t, ~name: string, ~arguments: arguments=?, unit) => option<bool> =
-    "getValue"
+  external getValueBool: (t, ~name: string, ~arguments: arguments=?) => option<bool> = "getValue"
 
   /**Returns a field value, expecting it to be an array of booleans.*/
   @send
@@ -225,12 +213,11 @@ module RecordProxy: {
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<bool>>> = "getValue"
 
   /**Sets a `RecordProxy.t` as the linked record for a particular field.*/
   @send
-  external setLinkedRecord: (t, ~record: t, ~name: string, ~arguments: arguments=?, unit) => t =
+  external setLinkedRecord: (t, ~record: t, ~name: string, ~arguments: arguments=?) => t =
     "setLinkedRecord"
 
   /**Sets an array of `RecordProxy.t` as the linked records for a particular field.*/
@@ -240,12 +227,11 @@ module RecordProxy: {
     ~records: array<option<t>>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setLinkedRecords"
 
   /**Sets a string as field value.*/
   @send
-  external setValueString: (t, ~value: string, ~name: string, ~arguments: arguments=?, unit) => t =
+  external setValueString: (t, ~value: string, ~name: string, ~arguments: arguments=?) => t =
     "setValue"
 
   /**Sets an array of strings as field value.*/
@@ -255,27 +241,20 @@ module RecordProxy: {
     ~value: array<string>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets an int as field value.*/
   @send
-  external setValueInt: (t, ~value: int, ~name: string, ~arguments: arguments=?, unit) => t =
-    "setValue"
+  external setValueInt: (t, ~value: int, ~name: string, ~arguments: arguments=?) => t = "setValue"
 
   /**Sets an array of ints as field value.*/
   @send
-  external setValueIntArray: (
-    t,
-    ~value: array<int>,
-    ~name: string,
-    ~arguments: arguments=?,
-    unit,
-  ) => t = "setValue"
+  external setValueIntArray: (t, ~value: array<int>, ~name: string, ~arguments: arguments=?) => t =
+    "setValue"
 
   /**Sets a float as field value.*/
   @send
-  external setValueFloat: (t, ~value: float, ~name: string, ~arguments: arguments=?, unit) => t =
+  external setValueFloat: (t, ~value: float, ~name: string, ~arguments: arguments=?) => t =
     "setValue"
 
   /**Sets an array of floats as field value.*/
@@ -285,13 +264,11 @@ module RecordProxy: {
     ~value: array<float>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets a boolean as field value.*/
   @send
-  external setValueBool: (t, ~value: bool, ~name: string, ~arguments: arguments=?, unit) => t =
-    "setValue"
+  external setValueBool: (t, ~value: bool, ~name: string, ~arguments: arguments=?) => t = "setValue"
 
   /**Sets an array of booleans as field value.*/
   @send
@@ -300,7 +277,6 @@ module RecordProxy: {
     ~value: array<bool>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets the field value to `undefined` (meaning Relay will treat it as missing data).*/
@@ -310,18 +286,12 @@ module RecordProxy: {
     @as(json`undefined`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets the field value to `null`.*/
   @send
-  external setValueToNull: (
-    t,
-    @as(json`null`) _,
-    ~name: string,
-    ~arguments: arguments=?,
-    unit,
-  ) => t = "setValue"
+  external setValueToNull: (t, @as(json`null`) _, ~name: string, ~arguments: arguments=?) => t =
+    "setValue"
 
   /**Sets this linked record to `undefined` (meaning Relay will treat it as missing data).*/
   @send
@@ -330,7 +300,6 @@ module RecordProxy: {
     @as(json`undefined`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets this linked record to `null`.*/
@@ -340,7 +309,6 @@ module RecordProxy: {
     @as(json`null`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets the field holding these linked records to `undefined` (meaning Relay will treat it as missing data).*/
@@ -350,7 +318,6 @@ module RecordProxy: {
     @as(json`undefined`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Sets the field holding these linked records to `null`.*/
@@ -360,7 +327,6 @@ module RecordProxy: {
     @as(json`null`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   /**Invalidates this record.
@@ -518,7 +484,6 @@ module ConnectionHandler: {
     ~record: RecordProxy.t,
     ~key: string,
     ~filters: arguments=?,
-    unit,
   ) => option<RecordProxy.t> = "getConnection"
 
   /**Creates an edge for a particular connection.*/
@@ -538,7 +503,6 @@ module ConnectionHandler: {
     ~connection: RecordProxy.t,
     ~newEdge: RecordProxy.t,
     ~cursor: string=?,
-    unit,
   ) => unit = "insertEdgeBefore"
 
   /**Inserts an edge into a connection _after_ the provided cursor. If no cursor is provided, it inserts the edge at the end of the connection list.*/
@@ -548,7 +512,6 @@ module ConnectionHandler: {
     ~connection: RecordProxy.t,
     ~newEdge: RecordProxy.t,
     ~cursor: string=?,
-    unit,
   ) => unit = "insertEdgeAfter"
 
   /**Deletes any edge from the connection where the node of the edge has the provided `dataId`. Please not that this _will not_ remove the actual node from the store. Use `RecordSourceSelectorProxy.delete` for that.*/
@@ -600,7 +563,6 @@ module Observable: {
     ~error: Js.Exn.t => unit=?,
     ~complete: unit => unit=?,
     ~unsubscribe: subscription => unit=?,
-    unit,
   ) => observer<'response> = ""
 
   /**Create a new observable, getting fed an `Observable.sink` for interacting with the observable, and optionally returning a `Observable.subscription` if you have things you want to unsubscribe from as the observable closes.*/
@@ -657,7 +619,6 @@ module Network: {
   external makePromiseBased: (
     ~fetchFunction: fetchFunctionPromise,
     ~subscriptionFunction: subscribeFn=?,
-    unit,
   ) => t = "create"
 
   /**Create a new `NetworkLayer` using a fetch function that returns an `Observable`.*/
@@ -666,7 +627,6 @@ module Network: {
   external makeObservableBased: (
     ~observableFunction: fetchFunctionObservable,
     ~subscriptionFunction: subscribeFn=?,
-    unit,
   ) => t = "create"
 }
 
@@ -678,7 +638,7 @@ module RecordSource: {
   /**Create a new `RecordSource`. Here's where you pass an existing `recordSourceRecords` if you have existing records you want to hydrate the store with, when doing SSR or similar.*/
   @module("relay-runtime")
   @new
-  external make: (~records: recordSourceRecords=?, unit) => t = "RecordSource"
+  external make: (~records: recordSourceRecords=?) => t = "RecordSource"
 
   /**Serializes the `RecordSource` into `recordSourceRecords` that you can use to rehydrate another store. Typically used for SSR.*/
   @send
@@ -695,9 +655,9 @@ module Store: {
     ~source: RecordSource.t,
     ~gcReleaseBufferSize: /* `gcReleaseBufferSize` controls how many queries are allowed to be cached by default. Increase this to increase the size of the cache. */
     int=?,
-    ~queryCacheExpirationTime: int=? /* `queryCacheExpirationTime` sets a TTL (time to live) for all queries. If that time passes, the data is considered stale and is evicted from the store. Default is no TTL. */,
-    unit,
-  ) => t
+    ~queryCacheExpirationTime: int=?,
+  ) => /* `queryCacheExpirationTime` sets a TTL (time to live) for all queries. If that time passes, the data is considered stale and is evicted from the store. Default is no TTL. */
+  t
 
   /**Gets the `RecordSource` for this `Store`.*/
   @send
@@ -752,7 +712,6 @@ module Environment: {
     ~missingFieldHandlers: array<MissingFieldHandler.t>=?,
     ~requiredFieldLogger: RequiredFieldLogger.t=?,
     ~isServer: bool=?,
-    unit,
   ) => t
 
   /**Get the `Store` for this `Environment`.*/
@@ -862,7 +821,6 @@ module MakeLoadQuery: (C: MakeLoadQueryConfig) =>
     ~fetchPolicy: fetchPolicy=?,
     ~fetchKey: string=?,
     ~networkCacheConfig: cacheConfig=?,
-    unit,
   ) => C.loadedQueryRef
 
   let queryRefToObservable: C.loadedQueryRef => option<Observable.t<C.response>>

package/src/RescriptRelayUtils.res

@@ -14,7 +14,7 @@ let resolveNestedRecord = (
       let currentPath = path->Belt.List.get(i)
       switch (currentRecord.contents, currentPath) {
       | (Some(record), Some(currentPath)) =>
-        currentRecord := record->RescriptRelay.RecordProxy.getLinkedRecord(~name=currentPath, ())
+        currentRecord := record->RescriptRelay.RecordProxy.getLinkedRecord(~name=currentPath)
       | _ => currentRecord := None
       }
     }
@@ -58,7 +58,6 @@ let removeNodeFromConnections = (~store, ~node, ~connections) =>
         ~record=owner,
         ~key=connectionConfig.key,
         ~filters=?connectionConfig.filters,
-        (),
       ) {
       | Some(connection) =>
         ConnectionHandler.deleteNode(~connection, ~nodeId=node->RecordProxy.getDataId)
@@ -76,13 +75,12 @@ let createAndAddEdgeToConnections = (~store, ~node, ~connections, ~edgeName, ~in
         ~record=connectionOwner,
         ~key=connectionConfig.key,
         ~filters=?connectionConfig.filters,
-        (),
       ) {
       | Some(connection) =>
         let edge = ConnectionHandler.createEdge(~store, ~connection, ~node, ~edgeType=edgeName)
         switch insertAt {
-        | Start => ConnectionHandler.insertEdgeAfter(~connection, ~newEdge=edge, ())
-        | End => ConnectionHandler.insertEdgeBefore(~connection, ~newEdge=edge, ())
+        | Start => ConnectionHandler.insertEdgeAfter(~connection, ~newEdge=edge)
+        | End => ConnectionHandler.insertEdgeBefore(~connection, ~newEdge=edge)
         }
       | None => ()
       }

package/src/RescriptRelay_Fragment.bs.js

@@ -38,14 +38,14 @@ function usePaginationFragment(node, fRef, convertFragment, convertRefetchVariab
   return {
           data: data,
           loadNext: React.useMemo((function () {
-                  return function (count, onComplete, param) {
+                  return function (count, onComplete) {
                     return p.loadNext(count, {
                                 onComplete: RescriptRelay_Internal.internal_nullableToOptionalExnHandler(onComplete)
                               });
                   };
                 }), [p.loadNext]),
           loadPrevious: React.useMemo((function () {
-                  return function (count, onComplete, param) {
+                  return function (count, onComplete) {
                     return p.loadPrevious(count, {
                                 onComplete: RescriptRelay_Internal.internal_nullableToOptionalExnHandler(onComplete)
                               });
@@ -56,7 +56,7 @@ function usePaginationFragment(node, fRef, convertFragment, convertRefetchVariab
           isLoadingNext: p.isLoadingNext,
           isLoadingPrevious: p.isLoadingPrevious,
           refetch: React.useMemo((function () {
-                  return function (variables, fetchPolicy, onComplete, param) {
+                  return function (variables, fetchPolicy, onComplete) {
                     return p.refetch(RescriptRelay_Internal.internal_cleanObjectFromUndefinedRaw(convertRefetchVariables(variables)), internal_makeRefetchableFnOpts(fetchPolicy, onComplete, undefined));
                   };
                 }), [p.refetch])
@@ -69,14 +69,14 @@ function useBlockingPaginationFragment(node, fRef, convertFragment, convertRefet
   return {
           data: data,
           loadNext: React.useMemo((function () {
-                  return function (count, onComplete, param) {
+                  return function (count, onComplete) {
                     return p.loadNext(count, {
                                 onComplete: RescriptRelay_Internal.internal_nullableToOptionalExnHandler(onComplete)
                               });
                   };
                 }), [p.loadNext]),
           loadPrevious: React.useMemo((function () {
-                  return function (count, onComplete, param) {
+                  return function (count, onComplete) {
                     return p.loadPrevious(count, {
                                 onComplete: RescriptRelay_Internal.internal_nullableToOptionalExnHandler(onComplete)
                               });
@@ -85,7 +85,7 @@ function useBlockingPaginationFragment(node, fRef, convertFragment, convertRefet
           hasNext: p.hasNext,
           hasPrevious: p.hasPrevious,
           refetch: React.useMemo((function () {
-                  return function (variables, fetchPolicy, onComplete, param) {
+                  return function (variables, fetchPolicy, onComplete) {
                     return p.refetch(RescriptRelay_Internal.internal_cleanObjectFromUndefinedRaw(convertRefetchVariables(variables)), internal_makeRefetchableFnOpts(fetchPolicy, onComplete, undefined));
                   };
                 }), [p.refetch])
@@ -99,7 +99,7 @@ function useRefetchableFragment(node, convertFragment, convertRefetchVariables,
   return [
           data,
           React.useMemo((function () {
-                  return function (variables, fetchPolicy, onComplete, param) {
+                  return function (variables, fetchPolicy, onComplete) {
                     return refetchFn(RescriptRelay_Internal.internal_removeUndefinedAndConvertNullsRaw(convertRefetchVariables(variables)), internal_makeRefetchableFnOpts(fetchPolicy, onComplete, undefined));
                   };
                 }), [refetchFn])

package/src/RescriptRelay_Fragment.res

@@ -63,11 +63,7 @@ let internal_makeRefetchableFnOpts = (~fetchPolicy=?, ~onComplete=?, ()) => {
 }
 
 type paginationLoadMoreOptions = {onComplete?: Js.Nullable.t<Js.Exn.t> => unit}
-type paginationLoadMoreFn = (
-  ~count: int,
-  ~onComplete: option<Js.Exn.t> => unit=?,
-  unit,
-) => Disposable.t
+type paginationLoadMoreFn = (~count: int, ~onComplete: option<Js.Exn.t> => unit=?) => Disposable.t
 type paginationFragmentReturnRaw<'fragment, 'refetchVariables> = {
   data: 'fragment,
   loadNext: (int, paginationLoadMoreOptions) => Disposable.t,
@@ -88,7 +84,6 @@ type paginationBlockingFragmentReturn<'fragment, 'refetchVariables> = {
     ~variables: 'refetchVariables,
     ~fetchPolicy: fetchPolicy=?,
     ~onComplete: option<Js.Exn.t> => unit=?,
-    unit,
   ) => Disposable.t,
 }
 type paginationFragmentReturn<'fragment, 'refetchVariables> = {
@@ -103,7 +98,6 @@ type paginationFragmentReturn<'fragment, 'refetchVariables> = {
     ~variables: 'refetchVariables,
     ~fetchPolicy: fetchPolicy=?,
     ~onComplete: option<Js.Exn.t> => unit=?,
-    unit,
   ) => Disposable.t,
 }
 
@@ -127,13 +121,13 @@ let usePaginationFragment = (
   let data = RescriptRelay_Internal.internal_useConvertedValue(convertFragment, p.data)
   {
     data,
-    loadNext: React.useMemo1(() => (~count, ~onComplete=?, ()) => {
+    loadNext: React.useMemo1(() => (~count, ~onComplete=?) => {
       p.loadNext(
         count,
         {onComplete: ?onComplete->RescriptRelay_Internal.internal_nullableToOptionalExnHandler},
       )
     }, [p.loadNext]),
-    loadPrevious: React.useMemo1(() => (~count, ~onComplete=?, ()) => {
+    loadPrevious: React.useMemo1(() => (~count, ~onComplete=?) => {
       p.loadPrevious(
         count,
         {onComplete: ?onComplete->RescriptRelay_Internal.internal_nullableToOptionalExnHandler},
@@ -143,7 +137,7 @@ let usePaginationFragment = (
     hasPrevious: p.hasPrevious,
     isLoadingNext: p.isLoadingNext,
     isLoadingPrevious: p.isLoadingPrevious,
-    refetch: React.useMemo1(() => (~variables, ~fetchPolicy=?, ~onComplete=?, ()) => {
+    refetch: React.useMemo1(() => (~variables, ~fetchPolicy=?, ~onComplete=?) => {
       p.refetch(
         RescriptRelay_Internal.internal_cleanObjectFromUndefinedRaw(
           variables->convertRefetchVariables,
@@ -173,13 +167,13 @@ let useBlockingPaginationFragment = (
   let data = RescriptRelay_Internal.internal_useConvertedValue(convertFragment, p.data)
   {
     data,
-    loadNext: React.useMemo1(() => (~count, ~onComplete=?, ()) => {
+    loadNext: React.useMemo1(() => (~count, ~onComplete=?) => {
       p.loadNext(
         count,
         {onComplete: ?onComplete->RescriptRelay_Internal.internal_nullableToOptionalExnHandler},
       )
     }, [p.loadNext]),
-    loadPrevious: React.useMemo1(() => (~count, ~onComplete=?, ()) => {
+    loadPrevious: React.useMemo1(() => (~count, ~onComplete=?) => {
       p.loadPrevious(
         count,
         {onComplete: ?onComplete->RescriptRelay_Internal.internal_nullableToOptionalExnHandler},
@@ -187,7 +181,7 @@ let useBlockingPaginationFragment = (
     }, [p.loadPrevious]),
     hasNext: p.hasNext,
     hasPrevious: p.hasPrevious,
-    refetch: React.useMemo1(() => (~variables, ~fetchPolicy=?, ~onComplete=?, ()) => {
+    refetch: React.useMemo1(() => (~variables, ~fetchPolicy=?, ~onComplete=?) => {
       p.refetch(
         RescriptRelay_Internal.internal_cleanObjectFromUndefinedRaw(
           variables->convertRefetchVariables,
@@ -226,7 +220,7 @@ let useRefetchableFragment = (
   (
     data,
     React.useMemo1(
-      () => (~variables: 'refetchVariables, ~fetchPolicy=?, ~onComplete=?, ()) =>
+      () => (~variables: 'refetchVariables, ~fetchPolicy=?, ~onComplete=?) =>
         refetchFn(
           RescriptRelay_Internal.internal_removeUndefinedAndConvertNullsRaw(
             variables->convertRefetchVariables,

package/src/RescriptRelay_Fragment.resi

@@ -20,11 +20,7 @@ let readInlineData: (
 
 type paginationLoadMoreOptions = {onComplete?: Js.Nullable.t<Js.Exn.t> => unit}
 
-type paginationLoadMoreFn = (
-  ~count: int,
-  ~onComplete: option<Js.Exn.t> => unit=?,
-  unit,
-) => Disposable.t
+type paginationLoadMoreFn = (~count: int, ~onComplete: option<Js.Exn.t> => unit=?) => Disposable.t
 
 type paginationBlockingFragmentReturn<'fragment, 'refetchVariables> = {
   data: 'fragment,
@@ -36,7 +32,6 @@ type paginationBlockingFragmentReturn<'fragment, 'refetchVariables> = {
     ~variables: 'refetchVariables,
     ~fetchPolicy: fetchPolicy=?,
     ~onComplete: option<Js.Exn.t> => unit=?,
-    unit,
   ) => Disposable.t,
 }
 
@@ -52,7 +47,6 @@ type paginationFragmentReturn<'fragment, 'refetchVariables> = {
     ~variables: 'refetchVariables,
     ~fetchPolicy: fetchPolicy=?,
     ~onComplete: option<Js.Exn.t> => unit=?,
-    unit,
   ) => Disposable.t,
 }
 
@@ -81,6 +75,5 @@ let useRefetchableFragment: (
     ~variables: 'refetchVariables,
     ~fetchPolicy: fetchPolicy=?,
     ~onComplete: option<Js.Exn.t> => unit=?,
-    unit,
   ) => Disposable.t,
 )

package/src/RescriptRelay_Internal.bs.js

@@ -68,8 +68,22 @@ function internal_nullableToOptionalExnHandler(x) {
   
 }
 
+var unwrapUnion = (function unwrapUnion(union, members) {
+    if (union != null && members.indexOf(union.__typename) === -1) { 
+      return Object.assign({}, union, {__typename: "__unselected"});
+    }
+
+    return union;
+  });
+
+function wrapUnion(union) {
+  return union;
+}
+
 exports.internal_useConvertedValue = internal_useConvertedValue;
 exports.internal_cleanObjectFromUndefinedRaw = internal_cleanObjectFromUndefinedRaw;
 exports.internal_removeUndefinedAndConvertNullsRaw = internal_removeUndefinedAndConvertNullsRaw;
 exports.internal_nullableToOptionalExnHandler = internal_nullableToOptionalExnHandler;
+exports.unwrapUnion = unwrapUnion;
+exports.wrapUnion = wrapUnion;
 /* react Not a pure module */

package/src/RescriptRelay_Internal.res

@@ -35,3 +35,15 @@ let internal_nullableToOptionalExnHandler = x =>
   }
 
 @live @unboxed type rec arg = Arg(_): arg
+
+let unwrapUnion: ('a, array<string>) => 'a = %raw(`
+  function unwrapUnion(union, members) {
+    if (union != null && members.indexOf(union.__typename) === -1) { 
+      return Object.assign({}, union, {__typename: "__unselected"});
+    }
+
+    return union;
+  }
+`)
+
+let wrapUnion = union => union

package/src/RescriptRelay_Internal.resi

@@ -5,3 +5,6 @@ let internal_nullableToOptionalExnHandler: option<option<'b> => 'a> => option<
   Js.Nullable.t<'b> => 'a,
 >
 @live @unboxed type rec arg = Arg(_): arg
+
+let unwrapUnion: ('a, array<string>) => 'a
+let wrapUnion: 'a => 'a

package/src/RescriptRelay_Mutation.bs.js

@@ -7,7 +7,7 @@ var ReactRelay = require("react-relay");
 var RelayRuntime = require("relay-runtime");
 
 function commitMutation(convertVariables, node, convertResponse, convertWrapRawResponse) {
-  return function (environment, variables, optimisticUpdater, optimisticResponse, updater, onCompleted, onError, uploadables, param) {
+  return function (environment, variables, optimisticUpdater, optimisticResponse, updater, onCompleted, onError, uploadables) {
     return RelayRuntime.commitMutation(environment, {
                 mutation: node,
                 variables: convertVariables(variables),
@@ -31,7 +31,7 @@ function useMutation(convertVariables, node, convertResponse, convertWrapRawResp
     var mutate = match[0];
     return [
             React.useMemo((function () {
-                    return function (variables, optimisticUpdater, optimisticResponse, updater, onCompleted, onError, uploadables, param) {
+                    return function (variables, optimisticUpdater, optimisticResponse, updater, onCompleted, onError, uploadables) {
                       return mutate({
                                   onError: onError,
                                   onCompleted: onCompleted !== undefined ? (function (res, err) {

package/src/RescriptRelay_Mutation.res

@@ -70,7 +70,6 @@ let commitMutation = (
     ~onCompleted=?,
     ~onError=?,
     ~uploadables=?,
-    (),
   ) => {
     commitMutation_(
       environment,
@@ -120,7 +119,6 @@ let useMutation = (
           ~onCompleted=?,
           ~onError=?,
           ~uploadables=?,
-          (),
         ) => {
           mutate({
             onCompleted: ?switch onCompleted {

package/src/RescriptRelay_Mutation.resi

@@ -31,7 +31,6 @@ let commitMutation: (
   ~onCompleted: ('response, option<array<mutationError>>) => unit=?,
   ~onError: mutationError => unit=?,
   ~uploadables: uploadables=?,
-  unit,
 ) => Disposable.t
 
 let useMutation: (
@@ -48,7 +47,6 @@ let useMutation: (
     ~onCompleted: ('response, option<array<mutationError>>) => unit=?,
     ~onError: mutationError => unit=?,
     ~uploadables: uploadables=?,
-    unit,
   ) => Disposable.t,
   bool,
 )

package/src/RescriptRelay_Query.bs.js

@@ -9,7 +9,7 @@ var RelayRuntime = require("relay-runtime");
 var RescriptRelay_Internal = require("./RescriptRelay_Internal.bs.js");
 
 function useQuery(convertVariables, node, convertResponse) {
-  return function (variables, fetchPolicy, fetchKey, networkCacheConfig, param) {
+  return function (variables, fetchPolicy, fetchKey, networkCacheConfig) {
     var __x = ReactRelay.useLazyLoadQuery(node, RescriptRelay_Internal.internal_cleanObjectFromUndefinedRaw(convertVariables(variables)), {
           fetchKey: fetchKey,
           fetchPolicy: fetchPolicy,
@@ -24,7 +24,7 @@ function useLoader(convertVariables, node, mkQueryRef) {
     var match = ReactRelay.useQueryLoader(node);
     var loadQueryFn = match[1];
     var loadQuery = React.useMemo((function () {
-            return function (variables, fetchPolicy, networkCacheConfig, param) {
+            return function (variables, fetchPolicy, networkCacheConfig) {
               loadQueryFn(convertVariables(variables), {
                     fetchPolicy: fetchPolicy,
                     networkCacheConfig: networkCacheConfig
@@ -47,7 +47,7 @@ function usePreloaded(node, convertResponse, mkQueryRef) {
 }
 
 function $$fetch(node, convertResponse, convertVariables) {
-  return function (environment, variables, onResult, networkCacheConfig, fetchPolicy, param) {
+  return function (environment, variables, onResult, networkCacheConfig, fetchPolicy) {
     ReactRelay.fetchQuery(environment, node, convertVariables(variables), {
             networkCacheConfig: networkCacheConfig,
             fetchPolicy: fetchPolicy
@@ -69,7 +69,7 @@ function $$fetch(node, convertResponse, convertVariables) {
 }
 
 function fetchPromised(node, convertResponse, convertVariables) {
-  return function (environment, variables, networkCacheConfig, fetchPolicy, param) {
+  return function (environment, variables, networkCacheConfig, fetchPolicy) {
     return Js_promise2.then(ReactRelay.fetchQuery(environment, node, convertVariables(variables), {
                       networkCacheConfig: networkCacheConfig,
                       fetchPolicy: fetchPolicy