ReScript

Author: MoOx

.gitattributes

@@ -9,8 +9,8 @@ node_modules
 # npm unused lock file (we use yarn.lock)
 package-lock.json
 
-#  ReScript / Reason / Ocaml artifacts
-#*.bs.js # we do want this files to ensure zero-cost
+# ReScript artifacts
+# *.bs.js # we do want this files to ensure zero-cost
 .bsb.lock
 **/lib/bs
 **/lib/ocaml

.gitignore

@@ -1,10 +1,10 @@
-# Changelog of `@reason-react-native/viewpager`
+# Changelog of `@rescript-react-native/viewpager`
 
 ## 4.0.0 - 2020-11-19
 
 - 4.0.0 compat
 - rescript 8.2
-- reason-react-native 0.63
+- rescript-react-native 0.63
 
 ## 3.3.0 - 2020-01-30
 

CHANGELOG.md

@@ -1,6 +1,6 @@
 MIT License
 
-Copyright (c) 2019 @reason-react-native contributors
+Copyright (c) 2019 @rescript-react-native contributors
 
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to deal

LICENSE

@@ -1,15 +1,15 @@
-# `@reason-react-native/viewpager`
+# `@rescript-react-native/viewpager`
 
-[![Build Status](https://github.com/reason-react-native/viewpager/workflows/Build/badge.svg)](https://github.com/reason-react-native/viewpager/actions)
-[![Version](https://img.shields.io/npm/v/@reason-react-native/viewpager.svg)](https://www.npmjs.com/@reason-react-native/viewpager)
-[![Chat](https://img.shields.io/discord/235176658175262720.svg?logo=discord&colorb=blue)](https://reasonml-community.github.io/reason-react-native/discord/)
+[![Build Status](https://github.com/rescript-react-native/viewpager/workflows/Build/badge.svg)](https://github.com/rescript-react-native/viewpager/actions)
+[![Version](https://img.shields.io/npm/v/@rescript-react-native/viewpager.svg)](https://www.npmjs.com/@rescript-react-native/viewpager)
+[![ReScript Forum](https://img.shields.io/discourse/posts?color=e6484f&label=ReScript%20Forum&server=https%3A%2F%2Fforum.rescript-lang.org)](https://forum.rescript-lang.org/)
 
-[ReScript](https://rescript-lang.org) / [Reason](https://reasonml.github.io) bindings for
+[ReScript](https://rescript-lang.org) bindings for
 [`@react-native-community/viewpager`](https://github.com/callstack/react-native-viewpager).
 
 Exposed as `ReactNativeViewPager` module.
 
-`@reason-react-native/viewpager` X.y.\* means it's compatible with
+`@rescript-react-native/viewpager` X.y.\* means it's compatible with
 `@react-native-community/viewpager` X.y.\*
 
 ## Installation
@@ -20,30 +20,30 @@ is properly installed & configured by following their installation instructions,
 you can install the bindings:
 
 ```console
-npm install @reason-react-native/viewpager
+npm install @rescript-react-native/viewpager
 # or
-yarn add @reason-react-native/viewpager
+yarn add @rescript-react-native/viewpager
 ```
 
-`@reason-react-native/viewpager` should be added to `bs-dependencies` in your
+`@rescript-react-native/viewpager` should be added to `bs-dependencies` in your
 `bsconfig.json`:
 
 ```diff
 {
   //...
   "bs-dependencies": [
-    "reason-react",
-    "reason-react-native",
+    "@rescript/react",
+    "rescript-react-native",
     // ...
-+    "@reason-react-native/viewpager"
++    "@rescript-react-native/viewpager"
   ],
   //...
 }
 ```
 
 ## Usage
 
-```reason
+```rescript
 [@react.component]
 let app = () =>
     <SafeAreaView style={styles##body}>
@@ -62,7 +62,7 @@ let app = () =>
 
 #### `ReactNativeViewPager` props
 
-```reason
+```rescript
 ~ref: ref=?,
 ~initialPage: int=?,
 ~scrollEnabled: bool=?,
@@ -83,13 +83,13 @@ let app = () =>
 
 #### `ReactNativeViewPager.setPage`
 
-```reason
+```rescript
 setPage: (T.t, int) => unit = "setPage";
 ```
 
 #### `ReactNativeViewPager.setPage`
 
-```reason
+```rescript
 setPageWithoutAnimation: (T.t, int) => unit =
     "setPageWithoutAnimation";
 ```
@@ -106,11 +106,11 @@ releases.
 ## Contribute
 
 Read the
-[contribution guidelines](https://github.com/reason-react-native/.github/blob/master/CONTRIBUTING.md)
+[contribution guidelines](https://github.com/rescript-react-native/.github/blob/master/CONTRIBUTING.md)
 before contributing.
 
 ## Code of Conduct
 
 We want this community to be friendly and respectful to each other. Please read
-[our full code of conduct](https://github.com/reason-react-native/.github/blob/master/CODE_OF_CONDUCT.md)
+[our full code of conduct](https://github.com/rescript-react-native/.github/blob/master/CODE_OF_CONDUCT.md)
 so that you can understand what actions will and will not be tolerated.

README.md

@@ -1,9 +1,6 @@
 {
-  "name": "@reason-react-native/viewpager",
-  "refmt": 3,
-  "reason": {
-    "react-jsx": 3
-  },
+  "name": "@rescript-react-native/viewpager",
+  "reason": { "react-jsx": 3 },
   "package-specs": {
     "module": "commonjs",
     "in-source": true
@@ -19,5 +16,5 @@
   "warnings": {
     "error": true
   },
-  "bs-dependencies": ["reason-react", "reason-react-native"]
+  "bs-dependencies": ["@rescript/react", "rescript-react-native"]
 }

bsconfig.json

@@ -1,5 +1,5 @@
 {
-  "name": "@reason-react-native/viewpager",
+  "name": "@rescript-react-native/viewpager",
   "description": "ReScript bindings for @react-native-community/viewpager.",
   "version": "4.0.0",
   "publishConfig": {
@@ -8,19 +8,17 @@
   "peerDependencies": {
     "@react-native-community/viewpager": "^4.0.0"
   },
-  "repository": "https://github.com/reason-react-native/viewpager.git",
+  "repository": "https://github.com/rescript-react-native/viewpager.git",
   "license": "MIT",
   "keywords": [
     "rescript",
-    "reason",
-    "reasonml",
-    "bucklescript",
     "react-native"
   ],
   "files": [
     "*.md",
     "bsconfig.json",
-    "src/**/*.re",
+    "src/**/*.res",
+    "src/**/*.resi",
     "src/**/*.js",
     "!src/**/*.bs.js"
   ],
@@ -37,13 +35,13 @@
     "release": "npmpub"
   },
   "devDependencies": {
-    "bs-platform": "^8.2.0",
+    "bs-platform": "^9.0.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.63.0"
+    "@rescript/react": "^0.10.0",
+    "rescript-react-native": "^0.64.3"
   },
   "prettier": {
     "trailingComma": "all"

package.json

@@ -1,7 +1,7 @@
 'use strict';
 
 var ViewPagerElement = require("./ViewPagerElement.bs.js");
-var Event$ReactNative = require("reason-react-native/src/apis/Event.bs.js");
+var Event$ReactNative = require("rescript-react-native/src/apis/Event.bs.js");
 
 Event$ReactNative.SyntheticEvent({});
 

src/ReactNativeViewPager.bs.js

@@ -0,0 +1,47 @@
+open ReactNative
+include ViewPagerElement
+
+module PageScrollEvent = {
+  type payload = {
+    position: int,
+    offset: float,
+  }
+  include Event.SyntheticEvent({
+    type _payload = payload
+  })
+}
+
+module PageSelectedEvent = {
+  type payload = {position: float}
+  include Event.SyntheticEvent({
+    type _payload = payload
+  })
+}
+
+module PageScrollStateChangedEvent = {
+  // new bs new polyvar encoding
+  //type payload = {pageScrollState: [ | `idle | `dragging | `settling]};
+  type payload = {pageScrollState: string}
+  include Event.SyntheticEvent({
+    type _payload = payload
+  })
+}
+
+@module("@react-native-community/viewpager") @react.component
+external make: (
+  ~ref: ref=?,
+  ~initialPage: int=?,
+  ~scrollEnabled: bool=?,
+  ~onPageScroll: PageScrollEvent.t => unit=?,
+  ~onPageSelected: PageSelectedEvent.t => unit=?,
+  ~onPageScrollStateChanged: PageScrollStateChangedEvent.t => unit=?,
+  ~keyboardDismissMode: @string [#none | @as("on-drag") #onDrag]=?,
+  ~pageMargin: int=?,
+  ~onMoveShouldSetResponderCapture: ReactNative.Event.pressEvent => bool=?,
+  ~style: ReactNative.Style.t=?,
+  ~children: React.element=?,
+  ~orientation: [#horizontal | #vertical]=?,
+  ~transitionStyle: [#scroll | #curl]=?,
+  ~showPageIndicator: bool=?,
+  ~overScrollMode: ScrollView.overScrollMode=?,
+) => React.element = "default"