Update codebase to rescript v12.0.0-alpha.9 (#990)

First step to working on #981

Author: aspeddro

package-lock.json

@@ -23,9 +23,7 @@
     "@docsearch/react": "^3.5.2",
     "@headlessui/react": "^1.2.0",
     "@mdx-js/loader": "^3.1.0",
-    "@rescript/core": "^1.4.0",
     "@rescript/react": "^0.12.0-alpha.3",
-    "@rescript/tools": "^0.5.0",
     "codemirror": "^5.54.0",
     "docson": "^2.1.0",
     "escodegen": "^2.1.0",
@@ -52,7 +50,7 @@
     "remark-rehype": "^11.1.1",
     "remark-stringify": "^11.0.0",
     "request": "^2.88.0",
-    "rescript": "^11.1.0",
+    "rescript": "^12.0.0-alpha.9",
     "stringify-object": "^3.3.0",
     "unified": "^11.0.5",
     "vfile-matter": "^5.0.0"
@@ -80,4 +78,4 @@
     "simple-functional-loader": "^1.2.1",
     "tailwindcss": "^3.3.3"
   }
-}
+}

package.json

@@ -5,14 +5,7 @@
     "version": 4
   },
   "bs-dependencies": [
-    "@rescript/react",
-    "@rescript/tools",
-    "@rescript/core"
-  ],
-  "uncurried": true,
-  "ppx-flags": [],
-  "bsc-flags": [
-    "-open RescriptCore"
+    "@rescript/react"
   ],
   "sources": [
     {
@@ -38,4 +31,4 @@
     "shims": [],
     "module": "es6"
   }
-}
+}

rescript.json

@@ -115,7 +115,9 @@ let docs = docsDecoded->Array.map(doc => {
   let rec getModules = (lst: list<Docgen.item>, moduleNames: list<module_>) =>
     switch lst {
     | list{
-        Module({id, items, name, docstrings}) | ModuleAlias({id, items, name, docstrings}),
+        Module({id, items, name, docstrings})
+        | ModuleAlias({id, items, name, docstrings})
+        | ModuleType({id, items, name, docstrings}),
         ...rest,
       } =>
       if Array.includes(hiddenModules, id) {
@@ -255,7 +257,10 @@ let () = {
   }
   let rec getModules = (lst: list<Docgen.item>, moduleNames, path) => {
     switch lst {
-    | list{Module({id, items, name}) | ModuleAlias({id, items, name}), ...rest} =>
+    | list{
+        Module({id, items, name}) | ModuleAlias({id, items, name}) | ModuleType({id, items, name}),
+        ...rest,
+      } =>
       if Array.includes(hiddenModules, id) {
         getModules(rest, moduleNames, path)
       } else {

scripts/gendocs.res

@@ -307,7 +307,7 @@ let default = (props: props) => {
       let valuesAndType = items->Array.map(item => {
         switch item {
         | Value({name, signature, docstrings, deprecated}) =>
-          let code = String.replaceRegExp(signature, %re("/\\n/g"), "\n")
+          let code = String.replaceRegExp(signature, /\\n/g, "\n")
           let slugPrefix = "value-" ++ name
           <>
             <H2 id=slugPrefix> {name->React.string} </H2>
@@ -316,7 +316,7 @@ let default = (props: props) => {
             <DocstringsStylize docstrings slugPrefix />
           </>
         | Type({name, signature, docstrings, deprecated}) =>
-          let code = String.replaceRegExp(signature, %re("/\\n/g"), "\n")
+          let code = String.replaceRegExp(signature, /\\n/g, "\n")
           let slugPrefix = "type-" ++ name
           <>
             <H2 id=slugPrefix> {name->React.string} </H2>
@@ -474,6 +474,7 @@ let processStaticProps = (~slug: array<string>, ~version: string) => {
               })
 
               Variant({items: items})->Null.make
+            | Signature(_) => Null.null
             }
           | None => Null.null
           }

src/ApiDocs.res

@@ -95,8 +95,8 @@ module BlogCard = {
           {
             let className = "absolute top-0 h-full w-full object-cover"
             switch previewImg {
-            | Some(src) => <img className src loading={#"lazy"} />
-            | None => <img className src=defaultPreviewImg loading={#"lazy"} />
+            | Some(src) => <img className src loading={#lazy} />
+            | None => <img className src=defaultPreviewImg loading={#lazy} />
             }
           }
         </Link>

src/Blog.res

@@ -20,7 +20,7 @@ module LinkCard = {
   let make = (~link, ~index) => {
     let loading = switch index {
     | 0 => #eager
-    | _ => #"lazy"
+    | _ => #lazy
     }
     <div className="rounded-lg  hover:text-fire overflow-hidden bg-gray-10 border-2 border-gray-30">
       <a href=link.url className="flex flex-col h-full">

src/CommunityContent.res

@@ -34,7 +34,7 @@ let make = (~logs, ~appendLog) => {
         ->Array.mapWithIndex(({level: logLevel, content: log}, i) => {
           let log = Array.join(log, " ")
           <pre
-            key={RescriptCore.Int.toString(i)}
+            key={Int.toString(i)}
             className={switch logLevel {
             | #log => ""
             | #warn => "text-orange"

src/ConsolePanel.res

@@ -151,14 +151,14 @@ type params = {slug: string}
 
 let decode = (json: JSON.t) => {
   open Json.Decode
-  let id = json->(field("id", string, _))
-  let keywords = json->(field("keywords", array(string, ...), _))
-  let name = json->(field("name", string, _))
-  let summary = json->(field("summary", string, _))
-  let category = json->field("category", string, _)->Category.fromString
+  let id = json->field("id", string, _)
+  let keywords = json->field("keywords", array(string, ...), _)
+  let name = json->field("name", string, _)
+  let summary = json->field("summary", string, _)
+  let category = json->(field("category", string, _))->Category.fromString
   let status =
     json
-    ->optional(field("status", string, _), _)
+    ->(optional(field("status", string, _), _))
     ->Option.mapOr(Status.Active, Status.fromString)
 
   {

src/SyntaxLookup.res

@@ -37,11 +37,9 @@ let getStaticProps: Next.GetStaticProps.t<props, _> = async _ => {
       switch line->String.startsWith("<a href") {
       | true =>
         // Adapted from https://semver.org/
-        let semverRe = %re(
-          "/v(0|[1-9]\d*)\.(0|[1-9]\d*)\.(0|[1-9]\d*)(?:-((?:0|[1-9]\d*|\d*[a-zA-Z-][0-9a-zA-Z-]*)(?:\.(?:0|[1-9]\d*|\d*[a-zA-Z-][0-9a-zA-Z-]*))*))?(?:\+([0-9a-zA-Z-]+(?:\.[0-9a-zA-Z-]+)*))?/"
-        )
-        switch Re.exec(semverRe, line) {
-        | Some(result) => Re.Result.fullMatch(result)->Some
+        let semverRe = /v(0|[1-9]\d*)\.(0|[1-9]\d*)\.(0|[1-9]\d*)(?:-((?:0|[1-9]\d*|\d*[a-zA-Z-][0-9a-zA-Z-]*)(?:\.(?:0|[1-9]\d*|\d*[a-zA-Z-][0-9a-zA-Z-]*))*))?(?:\+([0-9a-zA-Z-]+(?:\.[0-9a-zA-Z-]+)*))?/
+        switch RegExp.exec(semverRe, line) {
+        | Some(result) => RegExp.Result.fullMatch(result)->Some
         | None => None
         }
       | false => None