diff options
| author | Richard W.M. Jones <rjones@redhat.com> | 2011-11-29 17:13:45 +0000 |
|---|---|---|
| committer | Richard W.M. Jones <rjones@redhat.com> | 2011-11-29 17:13:45 +0000 |
| commit | 082a55f76cd61f3590976f6b095552ea65259ced (patch) | |
| tree | f287066c3a50a291633314342177d9960297b51e /ocaml | |
| parent | 6bd0eec12f2e39360847bfe7a9f50628cc89ed8e (diff) | |
| download | libguestfs-082a55f76cd61f3590976f6b095552ea65259ced.tar.gz libguestfs-082a55f76cd61f3590976f6b095552ea65259ced.tar.xz libguestfs-082a55f76cd61f3590976f6b095552ea65259ced.zip | |
ocaml: Load test should call Gc.compact to flag memory errors.
Diffstat (limited to 'ocaml')
| -rw-r--r-- | ocaml/t/guestfs_005_load.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ocaml/t/guestfs_005_load.ml b/ocaml/t/guestfs_005_load.ml index de670913..ace873fb 100644 --- a/ocaml/t/guestfs_005_load.ml +++ b/ocaml/t/guestfs_005_load.ml @@ -22,3 +22,5 @@ let _ = Guestfs.create let _ = let g = new Guestfs.guestfs () in g#get_verbose () + +let () = Gc.compact () |