caml_failwith ("tune2fs_l: used handle after closing it");
const char *device = String_val (devicev);
+ int i;
char **r;
caml_enter_blocking_section ();
ocaml_guestfs_raise_error (g, "tune2fs_l");
rv = copy_table (r);
+ for (i = 0; r[i] != NULL; ++i) free (r[i]);
free (r);
CAMLreturn (rv);
}