From d69a03e44832d8a8da84696bd4e2aaf3cd5d6cff Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Mon, 16 Jul 2012 14:01:46 +0100 Subject: Revert "ocaml: Calling Gc.compact before g#mount_local works around RHBZ#838081." This reverts commit ad7c4498f66f37c4219242c6df04d28e9ee7877f. Reverted because we still see core dumps. --- ocaml/t/guestfs_500_parallel_mount_local.ml | 1 - 1 file changed, 1 deletion(-) (limited to 'ocaml') diff --git a/ocaml/t/guestfs_500_parallel_mount_local.ml b/ocaml/t/guestfs_500_parallel_mount_local.ml index 926b9ee6..17e30ee7 100644 --- a/ocaml/t/guestfs_500_parallel_mount_local.ml +++ b/ocaml/t/guestfs_500_parallel_mount_local.ml @@ -115,7 +115,6 @@ and start_thread (filename, mp) = let t = time () in if t -. start_t < total_time then ( if debug then eprintf "%s < mounting filesystem\n%!" mp; - Gc.compact (); (* Workaround for RHBZ#838081 *) g#mount_local mp; (* Run test in an exec'd subprocess. *) -- cgit