mirror of
https://github.com/roc-lang/roc.git
synced 2025-09-28 14:24:45 +00:00
22 lines
783 B
Text
22 lines
783 B
Text
platform examples/cli
|
|
requires {}{ main : Str -> Task {} [] } # TODO FIXME
|
|
exposes []
|
|
packages {}
|
|
imports [ Task.{ Task } ]
|
|
provides [ mainForHost ]
|
|
effects fx.Effect
|
|
{
|
|
openFile : Str -> Effect U64,
|
|
closeFile : U64 -> Effect {},
|
|
withFileOpen : Str, (U64 -> Effect (Result ok err)) -> Effect {},
|
|
getFileLine : U64 -> Effect Str,
|
|
getFileBytes : U64 -> Effect (List U8),
|
|
putLine : Str -> Effect {},
|
|
putRaw : Str -> Effect {},
|
|
# Is there a limit to the number of effect, uncomment the next line and it crashes
|
|
#getLine : Effect Str,
|
|
getChar : Effect U8
|
|
}
|
|
|
|
mainForHost : Str -> Task {} [] as Fx
|
|
mainForHost = \file -> main file
|