module Echo

import StdEnv


Start :: *World -> *World
Start world
# (console, world) = stdio world
# (line, console) = freadline console
| not (fend console) = fwrites line
| otherwise = world