Update node deps to next breaking release (#1129)

purescript · Jan 14, 2024 · 68b6446 · 68b6446
1 parent c7d6a22
commit 68b6446
Show file tree

Hide file tree

Showing 30 changed files with 590 additions and 450 deletions.
diff --git a/core/spago.yaml b/core/spago.yaml
@@ -24,7 +24,6 @@ package:
     - newtype
     - node-buffer
     - node-fs
-    - node-fs-aff
     - node-path
     - node-process
     - ordered-collections

diff --git a/core/src/Log.purs b/core/src/Log.purs
@@ -152,13 +152,13 @@ logError l = log { level: LogError, content: Ansi.foreground Ansi.Red (toDoc l)
 die :: forall a b m u. MonadEffect m => MonadAsk (LogEnv b) m => Loggable a => a -> m u
 die msg = do
   logFailure msg
-  Effect.liftEffect $ Process.exit 1
+  Effect.liftEffect $ Process.exit' 1
 
 -- | Same as `die`, but with multiple failures
 die' :: forall a b m u. MonadEffect m => MonadAsk (LogEnv b) m => Loggable a => Array a -> m u
 die' msgs = do
   _ <- traverse logFailure msgs
-  Effect.liftEffect $ Process.exit 1
+  Effect.liftEffect $ Process.exit' 1
 
 justOrDieWith :: forall a b m x. MonadEffect m => MonadAsk (LogEnv b) m => Loggable a => Maybe x -> a -> m x
 justOrDieWith value msg = case value of

diff --git a/docs-search/index/spago.yaml b/docs-search/index/spago.yaml
@@ -21,7 +21,6 @@ package:
     - newtype
     - node-buffer
     - node-fs
-    - node-fs-aff
     - node-process
     - ordered-collections
     - prelude

diff --git a/docs-search/index/src/Docs/Search/IndexBuilder.purs b/docs-search/index/src/Docs/Search/IndexBuilder.purs
@@ -447,7 +447,7 @@ withExisting file f = do
 logAndExit :: forall a. String -> Effect a
 logAndExit message = do
   log message
-  Process.exit 1
+  Process.exit' 1
 
 showGlobs :: Array String -> String
 showGlobs = Array.intercalate ", "

diff --git a/docs-search/index/test/Docs/Search/Main.purs b/docs-search/index/test/Docs/Search/Main.purs
@@ -2,19 +2,28 @@ module Test.Docs.Search.Main where
 
 import Prelude
 
+import Data.Identity (Identity(..))
+import Data.Maybe (Maybe(..))
+import Data.Newtype (un)
 import Effect (Effect)
-import Effect.Aff (launchAff_)
+import Effect.Aff (Milliseconds(..), launchAff_)
 import Test.Declarations as Declarations
 import Test.IndexBuilder as IndexBuilder
 import Test.ModuleIndex as ModuleIndex
 import Test.ModuleParser as ModuleParser
-import Test.TypeQuery as TypeQuery
 import Test.Spec (Spec)
 import Test.Spec.Reporter.Console (consoleReporter)
-import Test.Spec.Runner (runSpec)
+import Test.Spec.Runner (Config, defaultConfig, runSpecT)
+import Test.TypeQuery as TypeQuery
+
+testConfig :: Config
+testConfig = defaultConfig
+  { slow = Milliseconds 2_000.0
+  , timeout = Just (Milliseconds 5_000.0)
+  }
 
 main :: Effect Unit
-main = launchAff_ $ runSpec [ consoleReporter ] mainTest
+main = launchAff_ $ void $ un Identity $ runSpecT testConfig [ consoleReporter ] mainTest
 
 mainTest :: Spec Unit
 mainTest = do