RosettaCodeData/Task/Input-loop/I/input-loop.i

9 lines
56 B
OpenEdge ABL

software {
loop {
read()
errors {
exit
}
}
}