test: fix test warnings

This commit is contained in:
orion kindel
2026-01-28 10:01:13 -06:00
parent f0fd42ceb6
commit d080bd9ca3
3 changed files with 4 additions and 18 deletions

View File

@@ -2,11 +2,9 @@ module Test.Control.Monad.Postgres where
import Prelude import Prelude
import Control.Monad.Cont (lift) import Control.Monad.Error.Class (throwError, try)
import Control.Monad.Error.Class (catchError, throwError, try)
import Control.Monad.Fork.Class (class MonadBracket, bracket) import Control.Monad.Fork.Class (class MonadBracket, bracket)
import Control.Monad.Postgres (PostgresT, cursor, exec_, fetch, fetchAll, fetchOne, query, runPostgres, transaction) import Control.Monad.Postgres (PostgresT, cursor, exec_, fetch, fetchAll, fetchOne, query, runPostgres, transaction)
import Control.Monad.Reader (ask)
import Control.Parallel (parTraverse) import Control.Parallel (parTraverse)
import Data.Array as Array import Data.Array as Array
import Data.Array.NonEmpty as Array.NonEmpty import Data.Array.NonEmpty as Array.NonEmpty
@@ -18,12 +16,9 @@ import Data.Tuple.Nested ((/\))
import Effect.Aff (Fiber) import Effect.Aff (Fiber)
import Effect.Aff.Class (class MonadAff, liftAff) import Effect.Aff.Class (class MonadAff, liftAff)
import Effect.Aff.Unlift (UnliftAff(..), askUnliftAff) import Effect.Aff.Unlift (UnliftAff(..), askUnliftAff)
import Effect.Class (liftEffect)
import Effect.Console (log)
import Effect.Exception (Error, error) import Effect.Exception (Error, error)
import Effect.Postgres.Error as E import Effect.Postgres.Error as E
import Effect.Postgres.Error.Except as X import Effect.Postgres.Error.Except as X
import Effect.Postgres.Error.RE as RE
import Partial.Unsafe (unsafePartial) import Partial.Unsafe (unsafePartial)
import Test.Common (re, withConfig) import Test.Common (re, withConfig)
import Test.Spec (Spec, around, describe, it) import Test.Spec (Spec, around, describe, it)

View File

@@ -2,10 +2,6 @@ module Test.Data.Postgres.Custom where
import Prelude import Prelude
import Control.Monad.Error.Class (liftEither)
import Control.Monad.Except (runExceptT)
import Data.Bifunctor (lmap)
import Data.DateTime (DateTime(..))
import Data.Generic.Rep (class Generic) import Data.Generic.Rep (class Generic)
import Data.Maybe (Maybe(..)) import Data.Maybe (Maybe(..))
import Data.Newtype (unwrap) import Data.Newtype (unwrap)

View File

@@ -2,23 +2,18 @@ module Test.Main where
import Prelude import Prelude
import Control.Alternative (guard)
import Control.Monad.Rec.Class (untilJust) import Control.Monad.Rec.Class (untilJust)
import Data.Either (Either(..), hush) import Data.Either (Either(..))
import Data.Filterable (filter) import Data.Filterable (filter)
import Data.Maybe (Maybe(..), isNothing, maybe) import Data.Maybe (Maybe(..), isNothing)
import Data.Newtype (wrap) import Data.Newtype (wrap)
import Data.String as String import Effect (Effect)
import Effect (Effect, untilE)
import Effect.Aff (Aff, bracket, delay, launchAff_, makeAff) import Effect.Aff (Aff, bracket, delay, launchAff_, makeAff)
import Effect.Class (liftEffect) import Effect.Class (liftEffect)
import Effect.Console (log) import Effect.Console (log)
import Node.Buffer as Buffer
import Node.ChildProcess (ChildProcess) import Node.ChildProcess (ChildProcess)
import Node.ChildProcess as ChildProcess import Node.ChildProcess as ChildProcess
import Node.ChildProcess.Aff as ChildProcess.Aff
import Node.ChildProcess.Types (Exit(..), stringSignal) import Node.ChildProcess.Types (Exit(..), stringSignal)
import Node.Encoding (Encoding(..))
import Node.EventEmitter as Event import Node.EventEmitter as Event
import Test.Control.Monad.Postgres as Test.Control.Monad.Postgres import Test.Control.Monad.Postgres as Test.Control.Monad.Postgres
import Test.Data.Postgres as Test.Data.Postgres import Test.Data.Postgres as Test.Data.Postgres