expect

Simple implementation of "expect" to help building unitary testing of interactive program
IN THIS PACKAGE
Module ExpectPcre
val expect : Expect.t -> ?fmatches:( string -> 'a option ) list -> ([< Expect.expect_match | `Pat of string | `Rex of Pcre.regexp ] * 'a) list -> 'a -> 'a