2024-04-30 18:39:51 +00:00
|
|
|
module Test.Main where
|
|
|
|
|
|
|
|
import Prelude
|
|
|
|
|
2024-05-10 23:40:36 +00:00
|
|
|
import Data.Maybe (Maybe(..))
|
2024-04-30 18:39:51 +00:00
|
|
|
import Effect (Effect)
|
2024-05-10 23:40:36 +00:00
|
|
|
import Effect.Aff (launchAff_)
|
2024-06-20 20:42:35 +00:00
|
|
|
import Effect.Class (liftEffect)
|
|
|
|
import Effect.Console as Console
|
|
|
|
import Node.EventEmitter as Event
|
|
|
|
import Node.Process as Process
|
2024-05-10 23:40:36 +00:00
|
|
|
import Test.Pipes.CSV as Test.Pipes.CSV
|
|
|
|
import Test.Spec.Reporter (specReporter)
|
|
|
|
import Test.Spec.Runner (defaultConfig, runSpec')
|
2024-04-30 18:39:51 +00:00
|
|
|
|
|
|
|
main :: Effect Unit
|
2024-06-20 20:42:35 +00:00
|
|
|
main = launchAff_ do
|
|
|
|
void $ liftEffect $ Event.on Process.uncaughtExceptionH (const $ Console.error) Process.process
|
|
|
|
runSpec' (defaultConfig { failFast = true, timeout = Nothing }) [ specReporter ] do
|
|
|
|
Test.Pipes.CSV.spec
|