Zero cost Modal constants. (#453)

Author: cknitt

reason-react-native/src/components/Modal.bs.js

@@ -1,13 +1,7 @@
 'use strict';
 
 
-var Orientation = /* module */[
-  /* landscape */"landscape",
-  /* landscapeLeft */"landscape-left",
-  /* landscapeRight */"landscape-right",
-  /* portrait */"portrait",
-  /* portraitUpsideDown */"portrait-upside-down"
-];
+var Orientation = 0;
 
 exports.Orientation = Orientation;
 /* No side effect */

reason-react-native/src/components/Modal.md

@@ -8,17 +8,7 @@ wip: true
 type element;
 type ref = React.Ref.t(Js.nullable(element));
 
-module Orientation = {
-  type t;
-
-  external fromString: string => t = "%identity";
-
-  let landscape = "landscape"->fromString;
-  let landscapeLeft = "landscape-left"->fromString;
-  let landscapeRight = "landscape-right"->fromString;
-  let portrait = "portrait"->fromString;
-  let portraitUpsideDown = "portrait-upside-down"->fromString;
-};
+module Orientation = Modal_Orientation;
 
 [@react.component] [@bs.module "react-native"]
 external make:

reason-react-native/src/components/Modal.re

@@ -1,17 +1,7 @@
 type element;
 type ref = React.Ref.t(Js.nullable(element));
 
-module Orientation = {
-  type t;
-
-  external fromString: string => t = "%identity";
-
-  let landscape = "landscape"->fromString;
-  let landscapeLeft = "landscape-left"->fromString;
-  let landscapeRight = "landscape-right"->fromString;
-  let portrait = "portrait"->fromString;
-  let portraitUpsideDown = "portrait-upside-down"->fromString;
-};
+module Orientation = Modal_Orientation;
 
 [@react.component] [@bs.module "react-native"]
 external make:

reason-react-native/src/types/Modal_Orientation.bs.js

@@ -0,0 +1 @@
+/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */

reason-react-native/src/types/Modal_Orientation.re

@@ -0,0 +1,16 @@
+type t = string;
+
+[@bs.inline]
+let landscape = "landscape";
+
+[@bs.inline]
+let landscapeLeft = "landscape-left";
+
+[@bs.inline]
+let landscapeRight = "landscape-right";
+
+[@bs.inline]
+let portrait = "portrait";
+
+[@bs.inline]
+let portraitUpsideDown = "portrait-upside-down";

reason-react-native/src/types/Modal_Orientation.rei

@@ -0,0 +1,16 @@
+type t;
+
+[@bs.inline "landscape"]
+let landscape: t;
+
+[@bs.inline "landscape-left"]
+let landscapeLeft: t;
+
+[@bs.inline "landscape-right"]
+let landscapeRight: t;
+
+[@bs.inline "portrait"]
+let portrait: t;
+
+[@bs.inline "portrait-upside-down"]
+let portraitUpsideDown: t;