update version; refactor main API

Author: kgoggin

package.json

@@ -15,11 +15,11 @@
   "author": "",
   "license": "MIT",
   "devDependencies": {
-    "bs-platform": "^2.1.0",
+    "bs-platform": "^3.1.5",
     "prettier": "^1.10.2"
   },
   "dependencies": {
-    "reason-react": "^0.3.0"
+    "reason-react": "^0.4.2"
   },
   "peerDependencies": {
     "@storybook/addon-actions": "^3.2.17",

src/knobs.re

@@ -1,62 +1,57 @@
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external withKnobs : Main.decorator =
-  "";
+external withKnobs : Main.decorator = "";
 
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external extText : (string, Js.null_undefined(string)) => string =
-  "text";
+external extText : (string, Js.null_undefined(string)) => string = "text";
 
 let text = (~label: string, ~defaultValue: option(string)=?, ()) =>
-  extText(label, Js.Nullable.from_opt(defaultValue));
+  extText(label, Js.Nullable.fromOption(defaultValue));
 
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external extBoolean : (string, Js.boolean) => Js.boolean =
-  "boolean";
+external extBoolean : (string, bool) => bool = "boolean";
 
-let boolean = (~label: string, ~defaultValue=Js.false_, ()) =>
-  Js.to_bool(extBoolean(label, defaultValue));
+let boolean = (~label: string, ~defaultValue=false, ()) =>
+  extBoolean(label, defaultValue);
 
 type jsRangeConfig = {
   .
-  "range": Js.boolean, "min": float, "max": float, "step": float
+  "range": bool,
+  "min": float,
+  "max": float,
+  "step": float,
 };
 
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external extNumber : (string, float, Js.null_undefined(jsRangeConfig)) => float =
+external extNumber :
+  (string, float, Js.null_undefined(jsRangeConfig)) => float =
   "number";
 
 type rangeConfig = {
   min: float,
   max: float,
-  step: float
+  step: float,
 };
 
 let number =
     (
       ~label: string,
       ~defaultValue=0.,
       ~rangeConfiguration: option(rangeConfig)=?,
-      ()
+      (),
     )
     : float =>
-  switch rangeConfiguration {
+  switch (rangeConfiguration) {
   | None => extNumber(label, defaultValue, Js.Nullable.undefined)
   | Some(c) =>
-    let config = {
-      "range": Js.true_,
-      "min": c.min,
-      "max": c.max,
-      "step": c.step
-    };
-    extNumber(label, defaultValue, Js.Nullable.return(config))
+    let config = {"range": true, "min": c.min, "max": c.max, "step": c.step};
+    extNumber(label, defaultValue, Js.Nullable.return(config));
   };
 
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external extColor : (string, Js.null_undefined(string)) => string =
-  "color";
+external extColor : (string, Js.null_undefined(string)) => string = "color";
 
 let color = (~label: string, ~defaultValue: option(string)=?, ()) =>
-  extColor(label, Js.Nullable.from_opt(defaultValue));
+  extColor(label, Js.Nullable.fromOption(defaultValue));
 
 type selectConfig('a) = 'a;
 
@@ -70,19 +65,20 @@ let select =
       ~label: string,
       ~options: selectConfig('a),
       ~defaultValue: option(string)=?,
-      ()
+      (),
     ) =>
-  extSelect(label, options, Js.Nullable.from_opt(defaultValue));
+  extSelect(label, options, Js.Nullable.fromOption(defaultValue));
 
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external extDate : (string, Js.null_undefined(Js_date.t)) => string =
-  "date";
+external extDate : (string, Js.null_undefined(Js_date.t)) => string = "date";
 
 let date = (~label: string, ~defaultValue: option(Js_date.t)=?, ()) =>
-  extDate(label, Js.Nullable.from_opt(defaultValue));
+  extDate(label, Js.Nullable.fromOption(defaultValue));
+
+type button;
 
 [@bs.val] [@bs.module "@storybook/addon-knobs/react"]
-external extButton : (string, ReactEventRe.Mouse.t => unit) => unit =
+external extButton : (string, ReactEventRe.Mouse.t => unit) => button =
   "button";
 
 let button = (~label: string, ~handler: ReactEventRe.Mouse.t => unit, ()) =>

src/story.re

@@ -0,0 +1,14 @@
+type section;
+
+type webpackModule;
+
+type chapter = unit => ReasonReact.reactElement;
+
+type decorator = chapter => ReasonReact.reactElement;
+
+[@bs.val] [@bs.module "@storybook/react"]
+external storiesOf : (string, webpackModule) => section = "";
+
+[@bs.send] external add : (section, string, chapter) => section = "";
+
+[@bs.send] external addDecorator : (section, decorator) => section = "";

yarn.lock

@@ -6,9 +6,9 @@ asap@~2.0.3:
   version "2.0.6"
   resolved "https://registry.yarnpkg.com/asap/-/asap-2.0.6.tgz#e50347611d7e690943208bbdafebcbc2fb866d46"
 
-bs-platform@^2.1.0:
-  version "2.2.2"
-  resolved "https://registry.yarnpkg.com/bs-platform/-/bs-platform-2.2.2.tgz#95ff37719771bbf310e8376fedd1148865c0da19"
+bs-platform@^3.1.5:
+  version "3.1.5"
+  resolved "https://registry.yarnpkg.com/bs-platform/-/bs-platform-3.1.5.tgz#fb34ee4702bc9163848d5537096c4f31ebaeed40"
 
 core-js@^1.0.0:
   version "1.2.7"
@@ -104,9 +104,9 @@ prop-types@^15.6.0:
     object-assign "^4.1.1"
     prop-types "^15.6.0"
 
-reason-react@^0.3.0:
-  version "0.3.2"
-  resolved "https://registry.yarnpkg.com/reason-react/-/reason-react-0.3.2.tgz#14574b619bd9bf2b6057d681867a5dfa69f2360f"
+reason-react@^0.4.2:
+  version "0.4.2"
+  resolved "https://registry.yarnpkg.com/reason-react/-/reason-react-0.4.2.tgz#690d34e3e91a2585cdc5f58384b6c8ff653c32c1"
   dependencies:
     react ">=15.0.0 || >=16.0.0"
     react-dom ">=15.0.0 || >=16.0.0"