tools: fix dir_sep and update rescript files

Author: aspeddro

tools/npm/RescriptTools.bs.js

@@ -22,6 +22,12 @@ type detail =
   | @as("record") Record({items: array<field>})
   | @as("variant") Variant({items: array<constructor>})
 
+type source = {
+  filepath: string,
+  line: int,
+  col: int,
+}
+
 @tag("kind")
 type rec item =
   | @as("value")
@@ -31,6 +37,7 @@ type rec item =
       signature: string,
       name: string,
       deprecated?: string,
+      source: source,
     })
   | @as("type")
   Type({
@@ -39,6 +46,7 @@ type rec item =
       signature: string,
       name: string,
       deprecated?: string,
+      source: source,
       /** Additional documentation for constructors and record fields, if available. */
       detail?: detail,
     })
@@ -48,20 +56,23 @@ type rec item =
       docstrings: array<string>,
       deprecated?: string,
       name: string,
+      source: source,
       items: array<item>,
     })
   | @as("moduleAlias")
   ModuleAlias({
       id: string,
       docstrings: array<string>,
       name: string,
+      source: source,
       items: array<item>,
     })
 
 type doc = {
   name: string,
   deprecated: option<string>,
   docstrings: array<string>,
+  source: source,
   items: array<item>,
 }
 

tools/npm/Tools_Docgen.bs.js

@@ -21,6 +21,12 @@ type detail =
   | @as("record") Record({items: array<field>})
   | @as("variant") Variant({items: array<constructor>})
 
+type source = {
+  filepath: string,
+  line: int,
+  col: int,
+}
+
 @tag("kind")
 type rec item =
   | @as("value")
@@ -30,6 +36,7 @@ type rec item =
       signature: string,
       name: string,
       deprecated?: string,
+      source: source,
     })
   | @as("type")
   Type({
@@ -38,6 +45,7 @@ type rec item =
       signature: string,
       name: string,
       deprecated?: string,
+      source: source,
       /** Additional documentation for constructors and record fields, if available. */
       detail?: detail,
     })
@@ -47,16 +55,24 @@ type rec item =
       docstrings: array<string>,
       deprecated?: string,
       name: string,
+      source: source,
       items: array<item>,
     })
   | @as("moduleAlias")
   ModuleAlias({
       id: string,
       docstrings: array<string>,
       name: string,
+      source: source,
       items: array<item>,
     })
 
-type doc = {name: string, deprecated: option<string>, docstrings: array<string>, items: array<item>}
+type doc = {
+  name: string,
+  deprecated: option<string>,
+  docstrings: array<string>,
+  source: source,
+  items: array<item>,
+}
 
 let decodeFromJson: Js.Json.t => doc

tools/npm/Tools_Docgen.res

@@ -280,6 +280,9 @@ let typeDetail typ ~env ~full =
 let makeId modulePath ~identifier =
   identifier :: modulePath |> List.rev |> SharedTypes.ident
 
+(**
+Get relative path to res/resi file
+*)
 let findRelativePath ~rootPath ~path =
   let open Filename in
   let realPath =
@@ -290,7 +293,7 @@ let findRelativePath ~rootPath ~path =
   in
   let rec loop dirPath acc =
     match dirname dirPath = realPath with
-    | true -> basename dirPath :: acc |> String.concat dir_sep
+    | true -> basename dirPath :: acc |> String.concat "/"
     | false -> (
       match dirPath with
       | "/" -> failwith "Failed to find relative path of package"
@@ -359,8 +362,8 @@ let extractDocs ~entryPointFile ~debug =
                   | true -> file.uri |> Uri.toPath
                   | false ->
                     findRelativePath ~rootPath ~path:(file.uri |> Uri.toPath));
-                line = 0;
-                col = 0;
+                line = 1;
+                col = 1;
               };
             items =
               structure.items

tools/npm/Tools_Docgen.resi

@@ -4,8 +4,8 @@
   "docstrings": ["Module level doc here."],
   "source": {
     "filepath": "src/DocExtraction2.resi",
-    "line": 0,
-    "col": 0
+    "line": 1,
+    "col": 1
   },
   "items": [
   {

tools/src/tools.ml

@@ -4,8 +4,8 @@
   "docstrings": ["Module level doc here."],
   "source": {
     "filepath": "src/DocExtraction2.resi",
-    "line": 0,
-    "col": 0
+    "line": 1,
+    "col": 1
   },
   "items": [
   {

tools/tests/src/expected/DocExtraction2.res.json

@@ -4,8 +4,8 @@
   "docstrings": ["Module level documentation goes here."],
   "source": {
     "filepath": "src/DocExtractionRes.res",
-    "line": 0,
-    "col": 0
+    "line": 1,
+    "col": 1
   },
   "items": [
   {
@@ -242,8 +242,8 @@
     "docstrings": [],
     "source": {
       "filepath": "src/DocExtractionRes.res",
-      "line": 0,
-      "col": 0
+      "line": 1,
+      "col": 1
     },
     "items": [
     {

tools/tests/src/expected/DocExtraction2.resi.json

@@ -4,8 +4,8 @@
   "docstrings": [],
   "source": {
     "filepath": "src/ModC.resi",
-    "line": 0,
-    "col": 0
+    "line": 1,
+    "col": 1
   },
   "items": [
   {

tools/tests/src/expected/DocExtractionRes.res.json

@@ -4,8 +4,8 @@
   "docstrings": [],
   "source": {
     "filepath": "src/ModC.resi",
-    "line": 0,
-    "col": 0
+    "line": 1,
+    "col": 1
   },
   "items": [
   {