expect

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