@@ -4,7 +4,6 @@ import ElmTest.Assertion as A
4import ElmTest.Run as R
4import ElmTest.Run as R
5import ElmTest.Runner.Console (runDisplay)
5import ElmTest.Runner.Console (runDisplay)
6import ElmTest.Test (..)
6import ElmTest.Test (..)
8import IO.IO (..)
7import IO.IO (..)
9import IO.Runner (Request, Response)
8import IO.Runner (Request, Response)
10import IO.Runner as Run
9import IO.Runner as Run
@@ -33,10 +32,7 @@ tests = suite "Elm Standard Library Tests"
33console : IO ()
32console : IO ()
34console = runDisplay tests
33console = runDisplay tests
36−port requests : Signal [{ mPut : Maybe String
35+port requests : Signal Request
40port requests = Run.run responses console
36port requests = Run.run responses console
42−port responses : Signal (Maybe String)
38+port responses : Signal Response