rescript 8.2 & rrn 0.63

Author: MoOx

bsconfig.json

@@ -18,7 +18,9 @@
   ],
   "bsc-flags": ["-bs-no-version-header"],
   "warnings": {
-    "number": "+102-105"
+    "error": true,
+    "number": "-30"
   },
+  "warnings-number-30-is-useless": "https://github.com/ocaml/ocaml/pull/9046",
   "bs-dependencies": ["reason-react", "reason-react-native"]
 }

package.json

@@ -10,7 +10,7 @@
     "@react-navigation/material-bottom-tabs": "^5.0.0",
     "@react-navigation/drawer": "^5.0.0",
     "reason-react": "^0.9.0",
-    "reason-react-native": "^0.62.0"
+    "reason-react-native": "^0.63.0"
   },
   "publishConfig": {
     "access": "public"
@@ -45,13 +45,13 @@
     "release": "npmpub"
   },
   "devDependencies": {
-    "bs-platform": "^8.0.0",
+    "bs-platform": "^8.2.0",
     "husky": "^4.0.0",
     "lint-staged": "^10.0.0",
     "npmpub": "^5.0.0",
     "prettier": "^2.0.0",
     "reason-react": "^0.9.0",
-    "reason-react-native": "^0.62.0"
+    "reason-react-native": "^0.63.0"
   },
   "prettier": {
     "trailingComma": "all"

src/BottomTabs.re

@@ -214,13 +214,7 @@ module Make = (M: {type params;}) => {
         ~initialRouteName: string=?,
         ~screenOptions: optionsCallback=?,
         ~children: React.element,
-        ~backBehavior: [@bs.string] [
-                         | `initialRoute
-                         | `order
-                         | `history
-                         | `none
-                       ]
-                         =?,
+        ~backBehavior: [ | `initialRoute | `order | `history | `none]=?,
         ~_lazy: bool=?,
         ~tabBar: Js.t(bottomTabBarProps) => React.element=?,
         ~tabBarOptions: bottomTabBarOptions=?,

src/Core.re

@@ -82,7 +82,7 @@ module EventConsumer = (M: {type params;}) => {
   external addListener:
     (
       navigation,
-      [@bs.string] [ | `focus | `blur | `tabPress],
+      [ | `focus | `blur | `tabPress],
       eventListenerCallback('data)
     ) =>
     unsubscribe =
@@ -91,7 +91,7 @@ module EventConsumer = (M: {type params;}) => {
   external removeListener:
     (
       navigation,
-      [@bs.string] [ | `focus | `blur | `tabPress],
+      [ | `focus | `blur | `tabPress],
       eventListenerCallback('data)
     ) =>
     unsubscribe =

src/Drawer.re

@@ -127,17 +127,11 @@ module Make = (M: {type params;}) => {
         ~initialRouteName: string=?,
         ~screenOptions: optionsCallback=?,
         ~children: React.element,
-        ~backBehavior: [@bs.string] [
-                         | `initialRoute
-                         | `order
-                         | `history
-                         | `none
-                       ]
-                         =?,
+        ~backBehavior: [ | `initialRoute | `order | `history | `none]=?,
         //DrawerNavigationConfig
         ~drawerBackgroundColor: string=?,
-        ~drawerPosition: [@bs.string] [ | `left | `right]=?,
-        ~drawerType: [@bs.string] [ | `front | `back | `slide]=?,
+        ~drawerPosition: [ | `left | `right]=?,
+        ~drawerType: [ | `front | `back | `slide]=?,
         /*
          ~drawerWidth: [@bs.unwrap] [
                          | `Static(float)
@@ -155,7 +149,7 @@ module Make = (M: {type params;}) => {
                                 =?,
         ~minSwipeDistance: float=?,
         ~overlayColor: string=?,
-        ~statusBarAnimation: [@bs.string] [ | `slide | `none | `fade]=?,
+        ~statusBarAnimation: [ | `slide | `none | `fade]=?,
         //TODO: ~gestureHandlerProps: React.ComponentProps<typeof PanGestureHandler>;
         ~_lazy: bool=?,
         ~unmountInactiveRoutes: bool=?,

src/Example.bs.js

@@ -6,8 +6,6 @@ var Stack$ReactNavigation = require("./Stack.bs.js");
 var Native = require("@react-navigation/native");
 
 function Example$HomeScreen(Props) {
-  Props.navigation;
-  Props.route;
   return React.createElement(ReactNative.Text, {
               children: "Hello Reasonable Person!"
             });
@@ -18,8 +16,6 @@ var HomeScreen = {
 };
 
 function Example$ModalScreen(Props) {
-  Props.navigation;
-  Props.route;
   return React.createElement(ReactNative.Text, {
               children: "Hello From Modal"
             });
@@ -38,8 +34,6 @@ var $$Screen = include.$$Screen;
 var $$Navigator = include.$$Navigator;
 
 function Example$MainStackScreen(Props) {
-  Props.navigation;
-  Props.route;
   return React.createElement($$Navigator.make, {
               children: React.createElement($$Screen.make, {
                     name: "Home",

src/Example.re

@@ -4,14 +4,14 @@
 module HomeScreen = {
   open ReactNative;
   [@react.component]
-  let make = (~navigation, ~route) =>
+  let make = (~navigation as _, ~route as _) =>
     <Text> {j|Hello Reasonable Person!|j}->React.string </Text>;
 };
 
 module ModalScreen = {
   open ReactNative;
   [@react.component]
-  let make = (~navigation, ~route) =>
+  let make = (~navigation as _, ~route as _) =>
     <Text> {j|Hello From Modal|j}->React.string </Text>;
 };
 
@@ -22,7 +22,7 @@ module MainStackScreen = {
   };
   include Stack.Make(StakeParams);
   [@react.component]
-  let make = (~navigation, ~route) =>
+  let make = (~navigation as _, ~route as _) =>
     <Navigator>
       <Screen
         name="Home"

src/MaterialBottomTabs.re

@@ -153,13 +153,7 @@ module Make = (M: {type params;}) => {
         ~initialRouteName: string=?,
         ~screenOptions: optionsCallback=?,
         ~children: React.element,
-        ~backBehavior: [@bs.string] [
-                         | `initialRoute
-                         | `order
-                         | `history
-                         | `none
-                       ]
-                         =?,
+        ~backBehavior: [ | `initialRoute | `order | `history | `none]=?,
         ~shifting: bool=?,
         ~labeled: bool=?,
         ~activeColor: string=?,

src/MaterialTopTabs.re

@@ -208,19 +208,13 @@ module Make = (M: {type params;}) => {
         ~initialRouteName: string=?,
         ~screenOptions: optionsCallback=?,
         ~children: React.element,
-        ~backBehavior: [@bs.string] [
-                         | `initialRoute
-                         | `order
-                         | `history
-                         | `none
-                       ]
-                         =?,
+        ~backBehavior: [ | `initialRoute | `order | `history | `none]=?,
         ~_lazy: bool=?,
         ~lazyPreloadDistance: int=?,
         ~lazyPlaceholder: React.component({. "route": route})=?,
         ~tabBar: Js.t(materialTopTabBarProps) => React.element=?,
         ~tabBarOptions: materialTopTabBarOptions=?,
-        ~tabBarPosition: [@bs.string] [ | `top | `bottom]=?,
+        ~tabBarPosition: [ | `top | `bottom]=?,
         ~removeClippedSubviews: bool=?,
         ~keyboardDismissMode: [@bs.string] [
                                 | `auto

src/Stack.re

@@ -88,17 +88,15 @@ module TransitionSpec = {
     overshootClamping: bool,
   };
   [@bs.obj]
-  external spring:
-    (~animation: [@bs.string] [ | `spring], ~config: springConfig) => t;
+  external spring: (~animation: [ | `spring], ~config: springConfig) => t;
 
   type timingConfig = {
     duration: int,
     easing: ReactNative.Easing.t,
   };
 
   [@bs.obj]
-  external timing:
-    (~animation: [@bs.string] [ | `timing], ~config: timingConfig) => t;
+  external timing: (~animation: [ | `timing], ~config: timingConfig) => t;
 };
 
 type transitionSpec = {
@@ -219,14 +217,14 @@ module Make = (M: {type params;}) => {
       ~cardOverlay: unit => React.element=?,
       ~cardStyle: ReactNative.Style.t=?,
       ~animationEnabled: bool=?,
-      ~animationTypeForReplace: [@bs.string] [ | `push | `pop]=?,
+      ~animationTypeForReplace: [ | `push | `pop]=?,
       ~gestureEnabled: bool=?,
       ~gestureResponseDistance: gestureResponseDistance=?,
       ~gestureVelocityImpact: float=?,
       // StackHeaderOptions
       ~headerShown: bool=?,
       ~headerTitle: HeaderTitle.t=?,
-      ~headerTitleAlign: [@bs.string] [ | `left | `center]=?,
+      ~headerTitleAlign: [ | `left | `center]=?,
       ~headerTitleStyle: ReactNative.Style.t=?,
       ~headerTitleContainerStyle: ReactNative.Style.t=?,
       ~headerTintColor: ReactNative.Color.t=?,
@@ -247,7 +245,7 @@ module Make = (M: {type params;}) => {
       ~headerStyle: ReactNative.Style.t=?,
       ~headerTransparent: bool=?,
       // TransitionPreset
-      ~gestureDirection: [@bs.string] [ | `horizontal | `vertical]=?,
+      ~gestureDirection: [ | `horizontal | `vertical]=?,
       ~transitionSpec: transitionSpec=?,
       ~cardStyleInterpolator: stackCardStyleInterpolator=?,
       ~headerStyleInterpolator: stackHeaderStyleInterpolator=?,
@@ -338,8 +336,8 @@ module Make = (M: {type params;}) => {
       (
         ~initialRouteName: string=?,
         ~screenOptions: optionsCallback=?,
-        ~mode: [@bs.string] [ | `card | `modal]=?,
-        ~headerMode: [@bs.string] [ | `float | `screen | `none]=?,
+        ~mode: [ | `card | `modal]=?,
+        ~headerMode: [ | `float | `screen | `none]=?,
         ~keyboardHandlingEnabled: bool=?,
         ~children: React.element,
         ~key: string=?,

yarn.lock

@@ -251,10 +251,10 @@ braces@^3.0.1:
   dependencies:
     fill-range "^7.0.1"
 
-bs-platform@^8.0.0:
-  version "8.0.3"
-  resolved "https://registry.yarnpkg.com/bs-platform/-/bs-platform-8.0.3.tgz#574e41ec04fee381d4c400dac547735368caa48f"
-  integrity sha512-I7wulOPM0/NGamwm9CDh9rGjW1oIKltPwwEIOJrL8DBFRXI8OFSACtWGlpaoOw76Xpf+KcVokr00keS2NlzA3A==
+bs-platform@^8.2.0:
+  version "8.3.2"
+  resolved "https://registry.yarnpkg.com/bs-platform/-/bs-platform-8.3.2.tgz#c307f1cc2d2397c3d088c7f3b62e9f493283cdcf"
+  integrity sha512-iOTi5JIlNPoCPq31NS9ET79FLyCpwTL2JZbgHz35LzY9Bch1iDtbBR3FVGhRbjphxelAP4fLlFONfUNp5Y3a5g==
 
 callsites@^3.0.0:
   version "3.1.0"
@@ -1104,10 +1104,10 @@ readjson@^2.0.1:
   dependencies:
     try-catch "^3.0.0"
 
-reason-react-native@^0.62.0:
-  version "0.62.0"
-  resolved "https://registry.yarnpkg.com/reason-react-native/-/reason-react-native-0.62.0.tgz#0f10e442a5bbb1a05124c9f595fed79673b0218a"
-  integrity sha512-tq13KJHk0D0otBviH9DJvejdcncxhCu8qR+AAiOWq4oQBC0cm9Zrl6+h+Wi+80pc9Cbe8KyMhcZh9N7e/X2dFA==
+reason-react-native@^0.63.0:
+  version "0.63.0"
+  resolved "https://registry.yarnpkg.com/reason-react-native/-/reason-react-native-0.63.0.tgz#08de85136a41809b9a66cac066d4ea6975406000"
+  integrity sha512-rE1OOph5Jxceost2ahdvX+VXJ2RPNyefX9FMXa/OXgqmLKjFeZuyVOySUj41UoohOYyKmZWbgansDGccwYrdUQ==
 
 reason-react@^0.9.0:
   version "0.9.1"