after.re

[@@bs.module "Run"] external onUnload : (unit => unit) => unit = "";

[@@bs.module "MyBootConfig"] external globalDelete : bool = "RickyGlobalDeleteGK";

[@@bs.module] external jordanRTCCallButton : ReactRe.reactClass = "RickyRTCCallButton.react";

[@@bs.module] [@@bs.splice] external cxRe : array string => string = "cx";

[@@bs.module] [@@bs.splice] external pureStoreBasedStateMixin : array RickyStoreRe.t => 'a =
  "PureStoreBasedStateMixin";

[@@bs.val] [@@bs.return null_to_opt] external _getElementById : string => option Dom.element =
  "document.getElementById";

[@@bs.val] [@@bs.module "ReactDOM"] external unmountComponentAtNode : Dom.element => unit =
  "unmountComponentAtNode";

[@@bs.splice] [@@bs.val] [@@bs.module "React"]
external createElement :
  string => props::reactDOMProps? => array ReactRe.reactElement => ReactRe.reactElement =
  "createElement";

[@@bs.send.pipe : t 'key 'value]
external filter : ('value => 'key => t 'key 'value => Js.boolean) => t 'key 'value =
  "";

[@@bs.module "MyBootIDs"] [@@bs.return null_undefined_to_opt]
external getSupportInboxItemIDFromThreadID : Js.null_undefined string => option string =
  "";

[@@bs.get] external altKey : t => bool = "";

[@@bs.send.pipe : synthetic 'a] external stopPropagation : unit = "";

[@@bs.send.pipe : t] external toggleForced : string => [@bs.as {json|true|json}] _ => bool =
  "toggle";

[@@bs.send.pipe : array 'a] external map : [@bs] ('a => 'b) => array 'b = "";

let test arr => arr |> map ([@bs] (fun x => x + 1)) |> forEach ([@bs] (fun x => Js.log x));

[@bs] jordanCalculateTruncationState root title buttons MyBootTitle montage;

type v = [@bs] (unit => string);

let ids = {
  "_COMPOSER_INPUT_DESCRIPTION": [@bs] uniqueID (),
  "_CONVERSATION": [@bs] uniqueID (),
  "_MAIN_LABEL": [@bs] uniqueID ()
};

type eventHandler = Js.t {. remove : [@bs.meth] (unit => unit)};

[@bs] InvariantRe.invariant Js.true_ "RickyDetailViewHeader: thread must not be null";

type v = [@bs] (Js.null_undefined Dom.element => Js.null_undefined Dom.element => unit);

type event 'a =
  Js.t {. listen : [@bs.meth] ('a => string => [@bs] (unit => unit) => eventHandler)};

[@@bs.send.pipe : t] external toggleForced : string => [@bs.as {json|true|json}] _ => bool =
  "toggle";

before.re

external onUnload : (unit => unit) => unit = "" [@@bs.module "Run"];

external globalDelete : bool = "RickyGlobalDeleteGK" [@@bs.module "MyBootConfig"];

external jordanRTCCallButton : ReactRe.reactClass = "RickyRTCCallButton.react" [@@bs.module];

external cxRe : array string => string = "cx" [@@bs.module] [@@bs.splice];

external pureStoreBasedStateMixin : array RickyStoreRe.t => 'a =
  "PureStoreBasedStateMixin" [@@bs.module] [@@bs.splice];

external _getElementById : string => option Dom.element =
  "document.getElementById" [@@bs.val] [@@bs.return null_to_opt];

external unmountComponentAtNode : Dom.element => unit =
  "unmountComponentAtNode" [@@bs.val] [@@bs.module "ReactDOM"];

external createElement :
  string => props::reactDOMProps? => array ReactRe.reactElement => ReactRe.reactElement =
  "createElement" [@@bs.splice] [@@bs.val] [@@bs.module "React"];

external filter : ('value => 'key => t 'key 'value => Js.boolean) => t 'key 'value =
  "" [@@bs.send.pipe : t 'key 'value];

external getSupportInboxItemIDFromThreadID : Js.null_undefined string => option string =
  "" [@@bs.module "MyBootIDs"] [@@bs.return null_undefined_to_opt];

external altKey : t => bool = "" [@@bs.get];

external stopPropagation : unit = "" [@@bs.send.pipe : synthetic 'a];

external toggleForced : string => _ [@bs.as {json|true|json}] => bool =
  "toggle" [@@bs.send.pipe : t];

external map : ('a => 'b) [@bs] => array 'b = "" [@@bs.send.pipe : array 'a];

let test arr => arr |> map ((fun x => x + 1) [@bs]) |> forEach ((fun x => Js.log x) [@bs]);

jordanCalculateTruncationState root title buttons MyBootTitle montage [@bs];

type v = (unit => string) [@bs];

let ids = {
  "_COMPOSER_INPUT_DESCRIPTION": uniqueID () [@bs],
  "_CONVERSATION": uniqueID () [@bs],
  "_MAIN_LABEL": uniqueID () [@bs]
};

type eventHandler = Js.t {. remove : (unit => unit) [@bs.meth]};

InvariantRe.invariant Js.true_ "RickyDetailViewHeader: thread must not be null" [@bs];

type v = (Js.null_undefined Dom.element => Js.null_undefined Dom.element => unit) [@bs];

type event 'a =
  Js.t {. listen : ('a => string => (unit => unit) [@bs] => eventHandler) [@bs.meth]};

external toggleForced : string => _ [@bs.as {json|true|json}] => bool =
  "toggle" [@@bs.send.pipe : t];