let
sync
=
sync
let
umount
() =
sync
();
let
n
=
C
.
Inode
.
busy
()
in
if
n
> 0
then
system_error
EBUSY
"umount"
(
string_of_int
n
);
C
.
close
()