Upgraded lbt-prelude-purescript

Author: bladyjoker

lambda-buffers-codegen/data/purescript-prelude-base.json

@@ -41,8 +41,8 @@
       "CodePoint"
     ],
     "Prelude.Integer": [
-      "bigints",
-      "Data.BigInt",
+      "js-bigints",
+      "JS.BigInt",
       "BigInt"
     ],
     "Prelude.Bool": [

testsuites/lbt-prelude/lbt-prelude-purescript/build.nix

@@ -26,7 +26,7 @@ _:
           withRuntime = false;
           packageLockOnly = true;
           packages = [
-            pkgs.nodejs_16
+            pkgs.nodejs-18_x
             pkgs.bashInteractive
             pkgs.fd
           ] ++ config.settings.shell.tools;

testsuites/lbt-prelude/lbt-prelude-purescript/package-lock.json

@@ -14,9 +14,8 @@
   "author": "Drazen Popovic",
   "license": "MIT",
   "dependencies": {
-    "@mlabs-haskell/json-bigint": " 1.0.0",
+    "@mlabs-haskell/json-bigint": "2.0.0",
     "base64-js": "^1.5.1",
-    "big-integer": "1.6.51",
     "bignumber.js": "^9.1.1",
     "bufferutil": "4.0.5",
     "node-polyfill-webpack-plugin": "1.1.4"

testsuites/lbt-prelude/lbt-prelude-purescript/package.json

@@ -105,8 +105,8 @@ in  upstream
 -------------------------------
 -}
 let upstream =
-      https://github.com/purescript/package-sets/releases/download/psc-0.14.5-20220224/packages.dhall
-        sha256:67cc3d4f0e8fb72bb1413ba94ddd72a3ceb0783eb725e3b22ad7568b3b581163
+      https://github.com/purescript/package-sets/releases/download/psc-0.15.4-20230105/packages.dhall
+        sha256:3e9fbc9ba03e9a1fcfd895f65e2d50ee2f5e86c4cd273f3d5c841b655a0e1bda
 
 let additions =
       { aeson =
@@ -117,8 +117,6 @@ let additions =
           , "argonaut-core"
           , "arrays"
           , "bifunctors"
-          , "bigints"
-          , "bignumber"
           , "const"
           , "control"
           , "effect"
@@ -127,6 +125,7 @@ let additions =
           , "foldable-traversable"
           , "foreign-object"
           , "integers"
+          , "js-bigints"
           , "lists"
           , "maybe"
           , "mote"
@@ -136,7 +135,6 @@ let additions =
           , "prelude"
           , "quickcheck"
           , "record"
-          , "sequences"
           , "spec"
           , "strings"
           , "tuples"
@@ -146,30 +144,7 @@ let additions =
           , "untagged-union"
           ]
         , repo = "https://github.com/mlabs-haskell/purescript-aeson.git"
-        , version = "bfd8f4dcd0522a076320f9dc710c24817438e02e"
-        }
-      , sequences =
-        { dependencies =
-          [ "arrays"
-          , "assert"
-          , "console"
-          , "effect"
-          , "lazy"
-          , "maybe"
-          , "newtype"
-          , "nonempty"
-          , "partial"
-          , "prelude"
-          , "profunctor"
-          , "psci-support"
-          , "quickcheck"
-          , "quickcheck-laws"
-          , "tuples"
-          , "unfoldable"
-          , "unsafe-coerce"
-          ]
-        , repo = "https://github.com/hdgarrood/purescript-sequences"
-        , version = "v3.0.2"
+        , version = "v2.0.0"
         }
       , mote =
         { dependencies = [ "these", "transformers", "arrays" ]
@@ -191,6 +166,11 @@ let additions =
         , repo = "https://github.com/mlabs-haskell/purescript-bignumber"
         , version = "705923edd892a3397b90d28ce7db9a7181dcd599"
         }
+      , js-bigints =
+        { dependencies = [ "integers", "maybe", "prelude" ]
+        , repo = "https://github.com/purescript-contrib/purescript-js-bigints"
+        , version = "36a7d8ac75a7230043ae511f3145f9ed130954a9"
+        }
       }
 
 in  (upstream // additions)

testsuites/lbt-prelude/lbt-prelude-purescript/packages.dhall

@@ -6,7 +6,7 @@
   , "arraybuffer-types"
   , "arrays"
   , "b64"
-  , "bigints"
+  , "js-bigints"
   , "effect"
   , "either"
   , "encoding"

testsuites/lbt-prelude/lbt-prelude-purescript/spago.dhall

@@ -24,8 +24,8 @@ module Test.LambdaBuffers.Prelude.Golden
   ) where
 
 import Prelude
-import Data.BigInt (BigInt, pow)
-import Data.BigInt as BigInt
+import JS.BigInt (BigInt, pow)
+import JS.BigInt as BigInt
 import Data.Either (Either(..))
 import Data.Enum (toEnumWithDefaults)
 import Data.Map (Map)

testsuites/lbt-prelude/lbt-prelude-purescript/test/Test/LambdaBuffers/Prelude/Golden.purs

@@ -3,6 +3,7 @@ module Test.Main
   ) where
 
 import Prelude
+
 import Data.Either (either)
 import Effect (Effect)
 import Effect.Aff (launchAff_)
@@ -12,11 +13,12 @@ import Test.Spec.Assertions (fail)
 import Test.Spec.Reporter.Console (consoleReporter)
 import Test.Spec.Runner (defaultConfig, runSpecT)
 
+-- TODO(bladyjoker): Ugh, clean up this remarkably complicated mess.
 main :: Effect Unit
 main = do
   goldenJson <- GoldenJson.tests
   either (fail <<< show) (launchAff_)
-    ( runSpecT defaultConfig [ consoleReporter ] do
+    ( map (const unit) <$> runSpecT defaultConfig [ consoleReporter ] do
         describe "LambdaBuffers Prelude runtime tests" do
           goldenJson
     )