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

2 lines
49 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
val () = (print o foldLines op^ "") TextIO.stdIn