ocaml: Catch EVENT_ENTER case in test.
authorRichard W.M. Jones <rjones@redhat.com>
Wed, 9 Nov 2011 17:50:37 +0000 (17:50 +0000)
committerRichard W.M. Jones <rjones@redhat.com>
Wed, 9 Nov 2011 22:08:20 +0000 (22:08 +0000)
commitb718bb9491f306efdd560b7fdbb526f8d49b5fc0
treec0037a8d6c2d55030edecef14704b24c8673d40f
parent3bde9fdffdb74183f7bf1315eb402918d3b13ed1
ocaml: Catch EVENT_ENTER case in test.

For some reason we are not compiling the tests with -warn-error so
this problem was not noticed before.

This fixes commit 9420eaf44ec4067c3740b91b0be0fede08a0c515.
(cherry picked from commit 22c72b911e65b93cfd049f42e6bd1b9ad7d55299)
ocaml/t/guestfs_400_events.ml