seq { while true do yield stdin.ReadLine () }|> Seq.takeWhile ((<>) "42")|> Seq.iter (printfn "%s")
1 2 10 42 11
1 2 10
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!