(* -*- tuareg -*- *)

(* This file is a sample ocaml init file for friendly interactive use
   of Lwt.

   You can copy it to ~/.ocamlinit.
*)

(* Use topfind, this is the minimum: *)
#use "topfind";;
(* Note: if you use lwt/toplevel.byte, you should remove this line *)

(* Syntax to use, you can replace that with #camlp4r if you prefer
   revised syntax: *)
#camlp4o;;

(* Load Lwt syntactic sugars: *)
#require "lwt.syntax";;

(* Load the lwt.top package, with line-editing support :) *)
#require "lwt.top";;

(* Open useful Lwt modules for scripting: *)
open Lwt_unix;;
open Lwt;;
open Lwt_io;;
open Lwt_process;;

(* Useful definitions for interactive use of Lwt, so you can write:

   $ run& printl "plop";;

   or:

   $ let l = run& read_line stdin;;
*)
let ( & ) a b = a b;;
let run = Lwt_main.run;;
