@kaiko.io/rescript-deser 3.1.0 → 3.1.2

package/lib/js/tests/index.js

@@ -0,0 +1,283 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+'use strict';
+
+var $$JSON = require("../src/JSON.js");
+var Curry = require("rescript/lib/js/curry.js");
+var Qunit = require("qunit");
+var Prelude = require("@kaiko.io/rescript-prelude/lib/js/src/Prelude.js");
+
+var fields = {
+  TAG: /* Object */3,
+  _0: [
+    [
+      "note",
+      /* String */1
+    ],
+    [
+      "date",
+      /* Date */5
+    ],
+    [
+      "extra",
+      {
+        TAG: /* Optional */4,
+        _0: /* String */1
+      }
+    ]
+  ]
+};
+
+var Deserializer = $$JSON.MakeDeserializer({
+      fields: fields
+    });
+
+var Appointment = {
+  Deserializer: Deserializer
+};
+
+Qunit.module("Basic deserializer", (function (param) {
+        var valid = [
+          [
+            {"note": "Bicentennial doctor's appointment", "date": "2100-01-01"},
+            {
+              note: "Bicentennial doctor's appointment",
+              date: new Date("2100-01-01"),
+              extra: undefined
+            }
+          ],
+          [
+            {
+      "note": "Bicentennial doctor's appointment",
+      "date": "2100-01-01",
+      "extra": "Don't take your stop-aging pills the night before the appointment",
+    },
+            {
+              note: "Bicentennial doctor's appointment",
+              date: new Date("2100-01-01"),
+              extra: "Don't take your stop-aging pills the night before the appointment"
+            }
+          ]
+        ];
+        Qunit.test("Correctly deserializes data", (function (qunit) {
+                qunit.expect(valid.length);
+                Curry._2(Prelude.$$Array.forEach, valid, (function (param) {
+                        var data = param[0];
+                        console.log("Running sample", data);
+                        var result = Curry._1(Deserializer.fromJSON, data);
+                        if (result.TAG === /* Ok */0) {
+                          qunit.deepEqual(result._0, param[1], "result == expected");
+                          return ;
+                        }
+                        console.error(result._0);
+                      }));
+              }));
+        var invalid = [[
+            "Missing non-optional field",
+            {"extra": "Bicentennial doctor's appointment", "date": "2100-01-01"}
+          ]];
+        Qunit.test("Correctly catches invalid data", (function (qunit) {
+                qunit.expect(invalid.length);
+                Curry._2(Prelude.$$Array.forEach, invalid, (function (param) {
+                        var data = param[1];
+                        console.log("Running sample", param[0], data);
+                        var result = Curry._1(Deserializer.fromJSON, data);
+                        if (result.TAG === /* Ok */0) {
+                          console.error("Invalid being accepted: ", result._0);
+                          return ;
+                        }
+                        console.log("Correctly detected:", result._0);
+                        qunit.ok(true, true);
+                      }));
+              }));
+      }));
+
+Qunit.module("Recursive deserializer", (function (param) {
+        var fields = {
+          TAG: /* Object */3,
+          _0: [
+            [
+              "data",
+              /* Any */0
+            ],
+            [
+              "children",
+              {
+                TAG: /* Array */1,
+                _0: /* Self */7
+              }
+            ]
+          ]
+        };
+        var DeserializerImpl = $$JSON.MakeDeserializer({
+              fields: fields
+            });
+        var checkFieldsSanity = DeserializerImpl.checkFieldsSanity;
+        var fromJSON = function (data) {
+          return Curry._2(Prelude.Result.map, Curry._1(DeserializerImpl.fromJSON, data), (function (prim) {
+                        return prim;
+                      }));
+        };
+        var valid = [[
+            {"data": "A", "children": [{"data": "A1", "children": []}, {"data": "B", "children": [{"data": "C", "children": []}, {"data": "D", "children": []}]}]},
+            {
+              data: "A",
+              children: [
+                {
+                  data: "A1",
+                  children: []
+                },
+                {
+                  data: "B",
+                  children: [
+                    {
+                      data: "C",
+                      children: []
+                    },
+                    {
+                      data: "D",
+                      children: []
+                    }
+                  ]
+                }
+              ]
+            }
+          ]];
+        Qunit.test("Trivial recursion detection: Ok", (function (qunit) {
+                qunit.expect(1);
+                qunit.deepEqual(Curry._1(checkFieldsSanity, undefined), {
+                      TAG: /* Ok */0,
+                      _0: undefined
+                    }, "Ok");
+              }));
+        Qunit.test("Infinite list", (function (qunit) {
+                var fields = {
+                  TAG: /* Object */3,
+                  _0: [
+                    [
+                      "head",
+                      /* String */1
+                    ],
+                    [
+                      "tail",
+                      /* Self */7
+                    ]
+                  ]
+                };
+                var InfiniteList = $$JSON.MakeDeserializer({
+                      fields: fields
+                    });
+                qunit.expect(1);
+                qunit.deepEqual(Curry._1(Prelude.Result.isError, Curry._1(InfiniteList.checkFieldsSanity, undefined)), true, "Ok");
+              }));
+        Qunit.test("Finite list", (function (qunit) {
+                var fields = {
+                  TAG: /* Object */3,
+                  _0: [
+                    [
+                      "head",
+                      /* String */1
+                    ],
+                    [
+                      "tail",
+                      {
+                        TAG: /* Optional */4,
+                        _0: /* Self */7
+                      }
+                    ]
+                  ]
+                };
+                var List = $$JSON.MakeDeserializer({
+                      fields: fields
+                    });
+                qunit.expect(1);
+                qunit.deepEqual(Curry._1(List.checkFieldsSanity, undefined), {
+                      TAG: /* Ok */0,
+                      _0: undefined
+                    }, "Ok");
+              }));
+        Qunit.test("Correctly deserializes recursive data", (function (qunit) {
+                qunit.expect(valid.length);
+                Curry._2(Prelude.$$Array.forEach, valid, (function (param) {
+                        var data = param[0];
+                        console.log("Running sample", data);
+                        var result = fromJSON(data);
+                        if (result.TAG === /* Ok */0) {
+                          qunit.deepEqual(result._0, param[1], "result == expected");
+                          return ;
+                        }
+                        console.error(result._0);
+                      }));
+              }));
+        Qunit.test("Recursion in sub-deserializer", (function (qunit) {
+                var fields = {
+                  TAG: /* Object */3,
+                  _0: [
+                    [
+                      "head",
+                      /* String */1
+                    ],
+                    [
+                      "tail",
+                      {
+                        TAG: /* Optional */4,
+                        _0: /* Self */7
+                      }
+                    ]
+                  ]
+                };
+                var List = $$JSON.MakeDeserializer({
+                      fields: fields
+                    });
+                var fields$1 = {
+                  TAG: /* Object */3,
+                  _0: [
+                    [
+                      "records",
+                      {
+                        TAG: /* Deserializer */7,
+                        _0: List
+                      }
+                    ],
+                    [
+                      "next",
+                      {
+                        TAG: /* Optional */4,
+                        _0: /* Self */7
+                      }
+                    ]
+                  ]
+                };
+                var Ledger = $$JSON.MakeDeserializer({
+                      fields: fields$1
+                    });
+                var data = {"records": {"head": "A", "tail": {"head": "B"}},
+        "next": {"records": {"head": "A", "tail": {"head": "B"}}}};
+                var expected = {
+                  records: {
+                    head: "A",
+                    tail: {
+                      head: "B",
+                      tail: undefined
+                    }
+                  },
+                  next: {
+                    records: {
+                      head: "A",
+                      tail: {
+                        head: "B",
+                        tail: undefined
+                      }
+                    },
+                    next: undefined
+                  }
+                };
+                qunit.expect(1);
+                qunit.deepEqual(Curry._1(Ledger.fromJSON, data), {
+                      TAG: /* Ok */0,
+                      _0: expected
+                    }, "nice ledger");
+              }));
+      }));
+
+exports.Appointment = Appointment;
+/* Deserializer Not a pure module */

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@kaiko.io/rescript-deser",
-  "version": "3.1.0",
+  "version": "3.1.2",
   "keywords": [
     "json",
     "deserializer",
@@ -11,12 +11,19 @@
   "author": "Kaiko Systems <info@kaikosystems.com>",
   "license": "MIT",
   "private": false,
+  "files": [
+    "lib",
+    "src",
+    "tests",
+    "www",
+    "README.md"
+  ],
   "dependencies": {
-    "@kaiko.io/rescript-prelude": "^6.0.0"
+    "@kaiko.io/rescript-prelude": "^6.2.2",
+    "rescript": "^10.1.4"
   },
   "devDependencies": {
     "esbuild": "^0.15.7",
-    "qunit": "^2.16.0",
-    "rescript": "^10.1.4"
+    "qunit": "^2.16.0"
   }
 }

package/.dir-locals.el

@@ -1,6 +0,0 @@
-;;; Directory Local Variables
-;;; For more information see (info "(emacs) Directory Variables")
-
-( (rescript-mode . ((projectile-project-compilation-cmd . "make compile-rescript")
-                     (indent-tabs-mode . nil)))
-  (nil . ((projectile-project-compilation-cmd . "make compile-rescript"))))

package/.gitlab-ci.yml

@@ -1,52 +0,0 @@
-stages:
-  - compile
-
-.x-compile: &with-compilation-script
-  image: node
-  script:
-    - make compile
-
-.x-when-mr: &when-merge-request
-  interruptible: true
-  only:
-    - merge_requests
-
-.x-when-stable: &when-in-stable
-  only:
-    - main
-
-.x-when-stable-or-mr: &when-stable-or-merging
-  interruptible: true
-  only:
-    - main
-    - merge_requests
-
-lint:
-  <<: *when-stable-or-merging
-  stage: compile
-  image: node
-  tags:
-    - docker
-  script:
-    - |
-      make format
-      touched=$(git status --porcelain | wc -l) || touched=0
-      if [ $touched -gt 0 ]; then
-          git status
-          exit 1
-      fi
-
-check that we can compile the whole thing before merging:
-  <<: *with-compilation-script
-  <<: *when-merge-request
-  stage: compile
-  tags:
-    - docker
-
-compile:
-  <<: *with-compilation-script
-  <<: *when-in-stable
-  interruptible: true
-  stage: compile
-  tags:
-    - docker

package/Makefile

@@ -1,32 +0,0 @@
-PATH := ./node_modules/.bin/:$(PATH)
-
-yarn.lock: bsconfig.json package.json
-	yarn install
-
-compile: yarn.lock
-	@if [ -n "$(INSIDE_EMACS)" ]; then \
-	    NINJA_ANSI_FORCED=0 rescript build -with-deps; \
-	else \
-		rescript build -with-deps; \
-	fi
-
-format: yarn.lock
-	rescript format -all
-
-publish: compile
-	yarn publish --access public
-
-.PHONY: format compile publish
-
-RESCRIPT_FILES := $(shell find src -type f -name '*.res')
-
-compile-rescript: $(RESCRIPT_FILES) yarn.lock
-	@if [ -n "$(INSIDE_EMACS)" ]; then \
-	    NINJA_ANSI_FORCED=0 rescript build -with-deps; \
-	else \
-		rescript build -with-deps; \
-	fi
-
-
-test: compile
-	esbuild lib/js/tests/index.js --bundle --outdir=www --servedir=www --serve=4369

package/bsconfig.json

@@ -1,20 +0,0 @@
-{
-  "name": "@kaiko.io/rescript-deser",
-  "sources": [
-    {
-      "dir": "src/",
-      "subdirs": true
-    },
-    {
-      "dir": "tests",
-      "type": "dev"
-    }
-  ],
-  "suffix": ".js",
-  "bs-dependencies": [
-    "@kaiko.io/rescript-prelude"
-  ],
-  "warnings": {
-    "error": "+8+11+26+27+33+56"
-  }
-}