Created
April 17, 2014 01:49
-
-
Save deadfoxygrandpa/10947587 to your computer and use it in GitHub Desktop.
Stack size
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Main where | |
import ElmTest.Assertion as A | |
import ElmTest.Run as R | |
import ElmTest.Runner.Console (runDisplay) | |
import ElmTest.Test (..) | |
import IO.IO (..) | |
import IO.Runner (Request, Response) | |
import IO.Runner as Run | |
tests = repeat 10000 (test "" <| A.assert True) | |
console : IO () | |
console = runDisplay tests | |
port requests : Signal [{ mPut : Maybe String | |
, mExit : Maybe Int | |
, mGet : Bool | |
}] | |
port requests = Run.run responses console | |
port responses : Signal (Maybe String) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment