rescript-relay 0.0.0-version-3-aeebeaab → 0.0.0-version-3-3504d777

package/CHANGELOG.md

@@ -8,6 +8,12 @@ Dedicated tooling for migrating is coming, as well as docs.
 
 ## Breaking changes
 
+- All trailing unit arguments are removed. Commit showing how this is migrated to in the tests: https://github.com/zth/rescript-relay/commit/2a16791268afb29d106362d0cf17915f69d5b4ff
+
+# 0.0.0-version-3-aeebeaab
+
+## Breaking changes
+
 - Object maker functions are removed, and leverage optional fields for all variables/input objects. Also a large change, tooling upcoming. Commit showing how this is migrated to in the tests: https://github.com/zth/rescript-relay/commit/fd6b07a1b26620c91e5de61f930235c35517da6a
 
 # 0.0.0-version-3-89bccc22

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "rescript-relay",
-  "version": "0.0.0-version-3-aeebeaab",
+  "version": "0.0.0-version-3-3504d777",
   "main": "src/RescriptRelay.res",
   "license": "MIT",
   "author": "Gabriel Nordeborn",

package/src/RescriptRelay.bs.js

@@ -27,7 +27,7 @@ function optArrayOfNullableToOptArrayOfOpt(x) {
   
 }
 
-function getLinkedRecords(t, name, $$arguments, param) {
+function getLinkedRecords(t, name, $$arguments) {
   return optArrayOfNullableToOptArrayOfOpt(Caml_option.nullable_to_opt(t.getLinkedRecords(name, $$arguments)));
 }
 
@@ -118,7 +118,7 @@ var Network = {};
 
 var RecordSource = {};
 
-function make(source, gcReleaseBufferSize, queryCacheExpirationTime, param) {
+function make(source, gcReleaseBufferSize, queryCacheExpirationTime) {
   return new RelayRuntime.Store(source, {
               gcReleaseBufferSize: gcReleaseBufferSize,
               queryCacheExpirationTime: queryCacheExpirationTime
@@ -135,26 +135,16 @@ function toJs(f) {
   };
 }
 
-function make$1(network, store, getDataID, treatMissingFieldsAsNull, missingFieldHandlers, requiredFieldLogger, isServer, param) {
-  var tmp = {
-    network: network,
-    store: store,
-    missingFieldHandlers: missingFieldHandlers !== undefined ? Belt_Array.concat(missingFieldHandlers, [nodeInterfaceMissingFieldHandler]) : [nodeInterfaceMissingFieldHandler]
-  };
-  if (getDataID !== undefined) {
-    tmp.getDataID = Caml_option.valFromOption(getDataID);
-  }
-  if (treatMissingFieldsAsNull !== undefined) {
-    tmp.treatMissingFieldsAsNull = Caml_option.valFromOption(treatMissingFieldsAsNull);
-  }
-  var tmp$1 = Belt_Option.map(requiredFieldLogger, toJs);
-  if (tmp$1 !== undefined) {
-    tmp.requiredFieldLogger = Caml_option.valFromOption(tmp$1);
-  }
-  if (isServer !== undefined) {
-    tmp.isServer = Caml_option.valFromOption(isServer);
-  }
-  return new RelayRuntime.Environment(tmp);
+function make$1(network, store, getDataID, treatMissingFieldsAsNull, missingFieldHandlers, requiredFieldLogger, isServer) {
+  return new RelayRuntime.Environment({
+              network: network,
+              store: store,
+              getDataID: getDataID,
+              treatMissingFieldsAsNull: treatMissingFieldsAsNull,
+              missingFieldHandlers: missingFieldHandlers !== undefined ? Belt_Array.concat(missingFieldHandlers, [nodeInterfaceMissingFieldHandler]) : [nodeInterfaceMissingFieldHandler],
+              requiredFieldLogger: Belt_Option.map(requiredFieldLogger, toJs),
+              isServer: isServer
+            });
 }
 
 var Environment = {
@@ -193,7 +183,7 @@ function useEnvironmentFromContext() {
 }
 
 function MakeLoadQuery(C) {
-  var load = function (environment, variables, fetchPolicy, fetchKey, networkCacheConfig, param) {
+  var load = function (environment, variables, fetchPolicy, fetchKey, networkCacheConfig) {
     return ReactRelay.loadQuery(environment, C.query, C.convertVariables(variables), {
                 fetchKey: fetchKey,
                 fetchPolicy: fetchPolicy,

package/src/RescriptRelay.res

@@ -21,7 +21,7 @@ external makeUploadables: Js.Dict.t<'file> => uploadables = "%identity"
 external unwrapUploadables: uploadables => Js.Dict.t<'file> = "%identity"
 
 @module("relay-runtime")
-external generateClientID: (~dataId: dataId, ~storageKey: string, ~index: int=?, unit) => dataId =
+external generateClientID: (~dataId: dataId, ~storageKey: string, ~index: int=?) => dataId =
   "generateClientID"
 
 @module("relay-runtime")
@@ -93,14 +93,14 @@ module RecordProxy = {
   @send external getDataId: t => dataId = "getDataID"
 
   @send @return(nullable)
-  external getLinkedRecord: (t, ~name: string, ~arguments: arguments=?, unit) => option<t> =
+  external getLinkedRecord: (t, ~name: string, ~arguments: arguments=?) => option<t> =
     "getLinkedRecord"
 
   @send @return(nullable)
   external getLinkedRecords: (t, string, option<arguments>) => option<array<Js.Nullable.t<t>>> =
     "getLinkedRecords"
 
-  let getLinkedRecords = (t, ~name, ~arguments=?, ()): option<array<option<t>>> =>
+  let getLinkedRecords = (t, ~name, ~arguments=?): option<array<option<t>>> =>
     getLinkedRecords(t, name, arguments)->optArrayOfNullableToOptArrayOfOpt
 
   @send
@@ -109,13 +109,12 @@ module RecordProxy = {
     ~name: string,
     ~typeName: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "getOrCreateLinkedRecord"
 
   @send external getType: t => string = "getType"
 
   @send @return(nullable)
-  external getValueString: (t, ~name: string, ~arguments: arguments=?, unit) => option<string> =
+  external getValueString: (t, ~name: string, ~arguments: arguments=?) => option<string> =
     "getValue"
 
   @send @return(nullable)
@@ -123,47 +122,40 @@ module RecordProxy = {
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<string>>> = "getValue"
 
   @send @return(nullable)
-  external getValueInt: (t, ~name: string, ~arguments: arguments=?, unit) => option<int> =
-    "getValue"
+  external getValueInt: (t, ~name: string, ~arguments: arguments=?) => option<int> = "getValue"
 
   @send @return(nullable)
   external getValueIntArray: (
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<int>>> = "getValue"
 
   @send @return(nullable)
-  external getValueFloat: (t, ~name: string, ~arguments: arguments=?, unit) => option<float> =
-    "getValue"
+  external getValueFloat: (t, ~name: string, ~arguments: arguments=?) => option<float> = "getValue"
 
   @send @return(nullable)
   external getValueFloatArray: (
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<float>>> = "getValue"
 
   @send @return(nullable)
-  external getValueBool: (t, ~name: string, ~arguments: arguments=?, unit) => option<bool> =
-    "getValue"
+  external getValueBool: (t, ~name: string, ~arguments: arguments=?) => option<bool> = "getValue"
 
   @send @return(nullable)
   external getValueBoolArray: (
     t,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => option<array<option<bool>>> = "getValue"
 
   @send
-  external setLinkedRecord: (t, ~record: t, ~name: string, ~arguments: arguments=?, unit) => t =
+  external setLinkedRecord: (t, ~record: t, ~name: string, ~arguments: arguments=?) => t =
     "setLinkedRecord"
 
   // `setLinkedRecord` can't be used for "deleting" linked record fields.
@@ -176,7 +168,6 @@ module RecordProxy = {
     @as(json`undefined`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send
@@ -185,7 +176,6 @@ module RecordProxy = {
     @as(json`null`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send
@@ -194,7 +184,6 @@ module RecordProxy = {
     ~records: array<option<t>>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setLinkedRecords"
 
   // `setLinkedRecords` can't be used for "deleting" linked records.
@@ -207,7 +196,6 @@ module RecordProxy = {
     @as(json`undefined`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send
@@ -216,7 +204,6 @@ module RecordProxy = {
     @as(json`null`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send
@@ -225,20 +212,14 @@ module RecordProxy = {
     @as(json`undefined`) _,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @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"
 
   @send
-  external setValueString: (t, ~value: string, ~name: string, ~arguments: arguments=?, unit) => t =
+  external setValueString: (t, ~value: string, ~name: string, ~arguments: arguments=?) => t =
     "setValue"
 
   @send
@@ -247,24 +228,17 @@ module RecordProxy = {
     ~value: array<string>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send
-  external setValueInt: (t, ~value: int, ~name: string, ~arguments: arguments=?, unit) => t =
-    "setValue"
+  external setValueInt: (t, ~value: int, ~name: string, ~arguments: arguments=?) => t = "setValue"
 
   @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"
 
   @send
-  external setValueFloat: (t, ~value: float, ~name: string, ~arguments: arguments=?, unit) => t =
+  external setValueFloat: (t, ~value: float, ~name: string, ~arguments: arguments=?) => t =
     "setValue"
 
   @send
@@ -273,12 +247,10 @@ module RecordProxy = {
     ~value: array<float>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send
-  external setValueBool: (t, ~value: bool, ~name: string, ~arguments: arguments=?, unit) => t =
-    "setValue"
+  external setValueBool: (t, ~value: bool, ~name: string, ~arguments: arguments=?) => t = "setValue"
 
   @send
   external setValueBoolArray: (
@@ -286,7 +258,6 @@ module RecordProxy = {
     ~value: array<bool>,
     ~name: string,
     ~arguments: arguments=?,
-    unit,
   ) => t = "setValue"
 
   @send external invalidateRecord: t => unit = "invalidateRecord"
@@ -423,7 +394,6 @@ module ConnectionHandler = {
     ~record: RecordProxy.t,
     ~key: string,
     ~filters: arguments=?,
-    unit,
   ) => option<RecordProxy.t> = "getConnection"
 
   @module("relay-runtime") @scope("ConnectionHandler")
@@ -439,7 +409,6 @@ module ConnectionHandler = {
     ~connection: RecordProxy.t,
     ~newEdge: RecordProxy.t,
     ~cursor: string=?,
-    unit,
   ) => unit = "insertEdgeBefore"
 
   @module("relay-runtime") @scope("ConnectionHandler")
@@ -447,7 +416,6 @@ module ConnectionHandler = {
     ~connection: RecordProxy.t,
     ~newEdge: RecordProxy.t,
     ~cursor: string=?,
-    unit,
   ) => unit = "insertEdgeAfter"
 
   @module("relay-runtime") @scope("ConnectionHandler")
@@ -497,7 +465,6 @@ module Observable = {
     ~error: Js.Exn.t => unit=?,
     ~complete: unit => unit=?,
     ~unsubscribe: subscription => unit=?,
-    unit,
   ) => observer<'response> = ""
 
   @module("relay-runtime") @scope("Observable")
@@ -541,14 +508,12 @@ module Network = {
   external makePromiseBased: (
     ~fetchFunction: fetchFunctionPromise,
     ~subscriptionFunction: subscribeFn=?,
-    unit,
   ) => t = "create"
 
   @module("relay-runtime") @scope("Network")
   external makeObservableBased: (
     ~observableFunction: fetchFunctionObservable,
     ~subscriptionFunction: subscribeFn=?,
-    unit,
   ) => t = "create"
 }
 
@@ -556,7 +521,7 @@ module RecordSource = {
   type t
 
   @module("relay-runtime") @new
-  external make: (~records: recordSourceRecords=?, unit) => t = "RecordSource"
+  external make: (~records: recordSourceRecords=?) => t = "RecordSource"
 
   @send external toJSON: t => recordSourceRecords = "toJSON"
 }
@@ -572,7 +537,7 @@ module Store = {
   @module("relay-runtime") @new
   external make: (RecordSource.t, storeConfig) => t = "Store"
 
-  let make = (~source, ~gcReleaseBufferSize=?, ~queryCacheExpirationTime=?, ()) =>
+  let make = (~source, ~gcReleaseBufferSize=?, ~queryCacheExpirationTime=?) =>
     make(
       source,
       {
@@ -602,19 +567,14 @@ module RequiredFieldLogger = {
 module Environment = {
   type t
 
-  @deriving(abstract)
   type environmentConfig<'a> = {
     network: Network.t,
     store: Store.t,
-    @optional
-    getDataID: (~nodeObj: 'a, ~typeName: string) => string,
-    @optional
-    treatMissingFieldsAsNull: bool,
+    getDataID?: (~nodeObj: 'a, ~typeName: string) => string,
+    treatMissingFieldsAsNull?: bool,
     missingFieldHandlers: array<MissingFieldHandler.t>,
-    @optional
-    requiredFieldLogger: RequiredFieldLogger.js,
-    @optional
-    isServer: bool,
+    requiredFieldLogger?: RequiredFieldLogger.js,
+    isServer?: bool,
   }
 
   @module("relay-runtime") @new
@@ -628,23 +588,19 @@ module Environment = {
     ~missingFieldHandlers=?,
     ~requiredFieldLogger=?,
     ~isServer=?,
-    (),
   ) =>
-    make(
-      environmentConfig(
-        ~network,
-        ~store,
-        ~getDataID?,
-        ~treatMissingFieldsAsNull?,
-        ~missingFieldHandlers=switch missingFieldHandlers {
-        | Some(handlers) => handlers->Belt.Array.concat([nodeInterfaceMissingFieldHandler])
-        | None => [nodeInterfaceMissingFieldHandler]
-        },
-        ~requiredFieldLogger=?requiredFieldLogger->Belt.Option.map(RequiredFieldLogger.toJs),
-        ~isServer?,
-        (),
-      ),
-    )
+    make({
+      network,
+      store,
+      ?getDataID,
+      ?treatMissingFieldsAsNull,
+      missingFieldHandlers: switch missingFieldHandlers {
+      | Some(handlers) => handlers->Belt.Array.concat([nodeInterfaceMissingFieldHandler])
+      | None => [nodeInterfaceMissingFieldHandler]
+      },
+      requiredFieldLogger: ?requiredFieldLogger->Belt.Option.map(RequiredFieldLogger.toJs),
+      ?isServer,
+    })
 
   @send external getStore: t => Store.t = "getStore"
   @send
@@ -721,14 +677,12 @@ module MakeLoadQuery = (C: MakeLoadQueryConfig) => {
     ~fetchPolicy: fetchPolicy=?,
     ~fetchKey: string=?,
     ~networkCacheConfig: cacheConfig=?,
-    unit,
   ) => C.loadedQueryRef = (
     ~environment,
     ~variables,
     ~fetchPolicy=?,
     ~fetchKey=?,
     ~networkCacheConfig=?,
-    (),
   ) =>
     loadQuery(
       environment,
@@ -755,7 +709,7 @@ module MakeLoadQuery = (C: MakeLoadQueryConfig) => {
       | None => resolve(Error())
       | Some(o) =>
         open Observable
-        let _: subscription = o->subscribe(makeObserver(~complete=() => resolve(Ok()), ()))
+        let _: subscription = o->subscribe(makeObserver(~complete=() => resolve(Ok())))
       }
     })
   }

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_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

package/src/RescriptRelay_Query.res

@@ -22,7 +22,7 @@ let useQuery = (
                 `Query.usePreloaded()` to this whenever you can, as that will \
                 allow you to start loading data before your code actually \
                 renders.*/
-  (~variables: 'variables, ~fetchPolicy=?, ~fetchKey=?, ~networkCacheConfig=?, ()) => {
+  (~variables: 'variables, ~fetchPolicy=?, ~fetchKey=?, ~networkCacheConfig=?) => {
     useLazyLoadQuery(
       node,
       RescriptRelay_Internal.internal_cleanObjectFromUndefinedRaw(variables->convertVariables),
@@ -55,7 +55,7 @@ let useLoader = (
   () => {
     let (nullableQueryRef, loadQueryFn, disposableFn) = useQueryLoader(node)
     let loadQuery = React.useMemo1(
-      () => (~variables, ~fetchPolicy=?, ~networkCacheConfig=?, ()) =>
+      () => (~variables, ~fetchPolicy=?, ~networkCacheConfig=?) =>
         loadQueryFn(variables->convertVariables, {?fetchPolicy, ?networkCacheConfig}),
       [loadQueryFn],
     )
@@ -106,7 +106,6 @@ let fetch = (
     ~onResult,
     ~networkCacheConfig=?,
     ~fetchPolicy=?,
-    (),
   ) => {
     open Observable
 
@@ -120,7 +119,6 @@ let fetch = (
       makeObserver(
         ~next=res => onResult(Ok(res->convertResponse)),
         ~error=err => onResult(Error(err)),
-        (),
       ),
     )
     ->ignoreSubscription
@@ -133,13 +131,7 @@ let fetchPromised = (
   ~convertVariables: 'variables => 'variables,
 ) => {
   /**Promise variant of `Query.fetch`.*/
-  (
-    ~environment: Environment.t,
-    ~variables: 'variables,
-    ~networkCacheConfig=?,
-    ~fetchPolicy=?,
-    (),
-  ) => {
+  (~environment: Environment.t, ~variables: 'variables, ~networkCacheConfig=?, ~fetchPolicy=?) => {
     fetchQuery(
       environment,
       node,

package/src/RescriptRelay_Query.resi

@@ -9,7 +9,6 @@ let useQuery: (
   ~fetchPolicy: fetchPolicy=?,
   ~fetchKey: string=?,
   ~networkCacheConfig: cacheConfig=?,
-  unit,
 ) => 'response
 
 let useLoader: (
@@ -18,12 +17,7 @@ let useLoader: (
   ~mkQueryRef: option<'queryRef> => option<'queryRef>,
 ) => unit => (
   option<'queryRef>,
-  (
-    ~variables: 'variables,
-    ~fetchPolicy: fetchPolicy=?,
-    ~networkCacheConfig: cacheConfig=?,
-    unit,
-  ) => unit,
+  (~variables: 'variables, ~fetchPolicy: fetchPolicy=?, ~networkCacheConfig: cacheConfig=?) => unit,
   unit => unit,
 )
 
@@ -43,7 +37,6 @@ let fetch: (
   ~onResult: result<'response, Js.Exn.t> => unit,
   ~networkCacheConfig: cacheConfig=?,
   ~fetchPolicy: fetchPolicy=?,
-  unit,
 ) => unit
 
 let fetchPromised: (
@@ -55,7 +48,6 @@ let fetchPromised: (
   ~variables: 'variables,
   ~networkCacheConfig: cacheConfig=?,
   ~fetchPolicy: fetchPolicy=?,
-  unit,
 ) => promise<'response>
 
 let retain: (

package/src/RescriptRelay_Subscriptions.bs.js

@@ -4,7 +4,7 @@
 var RelayRuntime = require("relay-runtime");
 
 function subscribe(node, convertVariables, convertResponse) {
-  return function (environment, variables, onCompleted, onError, onNext, updater, param) {
+  return function (environment, variables, onCompleted, onError, onNext, updater) {
     return RelayRuntime.requestSubscription(environment, {
                 subscription: node,
                 variables: convertVariables(variables),

package/src/RescriptRelay_Subscriptions.res

@@ -28,7 +28,6 @@ let subscribe = (
     ~onError=?,
     ~onNext=?,
     ~updater=?,
-    (),
   ) => {
     requestSubscription_(
       environment,

package/src/RescriptRelay_Subscriptions.resi

@@ -11,5 +11,4 @@ let subscribe: (
   ~onError: Js.Exn.t => unit=?,
   ~onNext: 'response => unit=?,
   ~updater: (RecordSourceSelectorProxy.t, 'response) => unit=?,
-  unit,
 ) => Disposable.t