mirror of
https://github.com/roc-lang/roc.git
synced 2025-10-03 08:34:33 +00:00
12 lines
401 B
Text
12 lines
401 B
Text
app "echo"
|
|
packages { base: "platform/" }
|
|
imports [ base.Task.{ after }, base.Stdout, base.Stdin ]
|
|
provides [ main ] to base
|
|
|
|
main : Task.Task {} *
|
|
main =
|
|
after (Stdout.line "What's your first name?") \{} ->
|
|
after Stdin.line \firstName ->
|
|
after (Stdout.line "What's your last name?") \{} ->
|
|
after Stdin.line \lastName ->
|
|
Stdout.line "Hi, \(firstName) \(lastName)!"
|