├── .gitignore
├── README.md
├── app
├── entry.client.res
├── entry.server.res
├── res-routes
│ ├── gists.res
│ └── index.res
└── root.res
├── bsconfig.json
├── jsconfig.json
├── package-lock.json
├── package.json
├── patches
└── @remix-run+dev+1.1.1.patch
├── public
└── favicon.ico
└── remix.config.js
/.gitignore:
--------------------------------------------------------------------------------
1 | node_modules
2 |
3 | /.cache
4 | /build
5 | /public/build
6 | .env
7 |
8 | /app/**/*.jsx
9 | /app/**/*.js
10 | /lib/
11 | .bsb.lock
12 | .merlin
13 |
--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
1 | # ReScript Remix Template
2 |
3 | A starter template for writing Remix apps in [ReScript](https://rescript-lang.org/).
4 |
5 | ## Development
6 |
7 | ```
8 | npm i
9 | npm run dev:rescript
10 | ```
11 |
12 | And then in another terminal:
13 |
14 | ```
15 | npm run dev:remix
16 | ```
17 |
18 | ## Building
19 |
20 | ```
21 | npm run build
22 | ```
23 |
--------------------------------------------------------------------------------
/app/entry.client.res:
--------------------------------------------------------------------------------
1 | @val external document: Dom.element = "document"
2 |
3 | ReactDOM.hydrate( , document)
4 |
--------------------------------------------------------------------------------
/app/entry.server.res:
--------------------------------------------------------------------------------
1 | module ResponseInit = {
2 | type t
3 |
4 | external make: {..} => t = "%identity"
5 | }
6 |
7 | // TODO: Swap out for Webapi.Fetch.Response when it supports construction
8 | // See https://github.com/tinymce/rescript-webapi/issues/63
9 | @new
10 | external makeResponse: (Webapi.Fetch.BodyInit.t, ResponseInit.t) => Webapi.Fetch.Response.t =
11 | "Response"
12 |
13 | let default = (request, responseStatusCode, responseHeaders, remixContext) => {
14 | open Webapi
15 |
16 | let markup = ReactDOMServer.renderToString(
17 | Fetch.Request.url} />,
18 | )
19 |
20 | responseHeaders->Fetch.Headers.set("Content-Type", "text/html")
21 |
22 | makeResponse(
23 | Fetch.BodyInit.make("" ++ markup),
24 | ResponseInit.make({
25 | "status": responseStatusCode,
26 | "headers": responseHeaders,
27 | }),
28 | )
29 | }
30 |
--------------------------------------------------------------------------------
/app/res-routes/gists.res:
--------------------------------------------------------------------------------
1 | type gist = {
2 | html_url: string,
3 | id: string,
4 | }
5 |
6 | type loaderData = array
7 |
8 | // Explicit return type for type safety
9 | let loader = (): Promise.t =>
10 | Webapi.Fetch.fetch("https://api.github.com/gists")
11 | ->Promise.then(res => res->Webapi.Fetch.Response.json)
12 | ->Promise.thenResolve(json =>
13 | json
14 | ->Js.Json.decodeArray
15 | ->Belt.Option.map(gists =>
16 | gists->Js.Array2.map(gist => {
17 | let gist = gist->Js.Json.decodeObject->Belt.Option.getUnsafe
18 |
19 | {
20 | html_url: gist
21 | ->Js.Dict.get("html_url")
22 | ->Belt.Option.flatMap(Js.Json.decodeString)
23 | ->Belt.Option.getExn,
24 | id: gist
25 | ->Js.Dict.get("id")
26 | ->Belt.Option.flatMap(Js.Json.decodeString)
27 | ->Belt.Option.getExn,
28 | }
29 | })
30 | )
31 | ->Belt.Option.getUnsafe
32 | )
33 |
34 | let default = () => {
35 | let gists: loaderData = Remix.useLoaderData()
36 |
37 |
44 | }
45 |
--------------------------------------------------------------------------------
/app/res-routes/index.res:
--------------------------------------------------------------------------------
1 | @react.component
2 | let default = () =>
3 |
4 |
{"Welcome to Remix"->React.string}
5 |
22 |