RosettaCodeData/Task/Input-loop/Standard-ML/input-loop-2.ml

2 lines
49 B
Standard ML

val () = (print o foldLines op^ "") TextIO.stdIn