while true do let n = read_int () in if n = 42 then exit 0; print_int n; print_newline ()done;
1 2 10 42 11 101 1234
1 2 10
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!