interface Stdin
    exposes [ char ]
    imports [ fx.Effect, Task ]

#line : Task.Task Str *
#line = Effect.after Effect.getLine Task.succeed # TODO FIXME Effect.getLine should suffice

char : Task.Task U8 *
char = Effect.after Effect.getChar Task.succeed # TODO FIXME Effect.getLine should suffice