Fatal error: exception File "lam.ml", line 1399

[wokalski]

Throwing code (click to expand)

module ScrollView = {
  external wrapUpdaterShamelessly : AnimatedRe.animatedEvent => RNEvent.NativeEvent.t => unit =
    "%identity";
  let onScrollUpdater ::x=? ::y=? ::native=false () =>
    wrapUpdaterShamelessly (
      AnimatedRe.event
        (
          Array.of_list [
            {
              "nativeEvent": {
                "contentOffset": {"x": Js.Undefined.from_opt x, "y": Js.Undefined.from_opt y}
              }
            }
          ]
        )
        {"useNativeDriver": Js.Boolean.to_js_boolean native}
    );
  include
    ScrollViewRe.CreateComponent {
      external view : ReactRe.reactClass =
        "ScrollView" [@@bs.module "react-native"] [@@bs.scope "Animated"];
      let view = view;
    };
};

According to our conversation from discord it's because wrapUpdaterShamelessly doesn't have arity 1.