SHOW:
|
|
- or go back to the newest paste.
1 | - | (* this does not work as I expected*) |
1 | + | |
2 | - | (* this gives a warning, Lwt.return line warning: Warning 10: this expression should have type unit. *) |
2 | + | Lwt_io.printf "readall result\n%s\n%!" a >>= fun () -> |
3 | Lwt_unix.close fd; | |
4 | - | ignore(Lwt_io.printf "readall result\n%!"); |
4 | + | Lwt.return () |