type
file_descr
= {
inode
:
inode
;
mutable
pos
:
int
;
mutable
closed
:
bool
}