Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
21 lines (12 sloc) 327 Bytes
port module Stdin exposing (Event(..), subscriptions)
port onStdinLine : (String -> msg) -> Sub msg
port onStdinClosed : (() -> msg) -> Sub msg
type Event
= Line String
| Closed
subscriptions : Sub Event
subscriptions =
Sub.batch
[ onStdinLine Line
, onStdinClosed (\() -> Closed)
]