module Field:sig
..end
module T:sig
..end
type('a, 'r)
t =('a, 'r) T.field
= {
|
name : |
(* |
name of the field
| *) |
|
ty : |
(* |
type of the field
| *) |
|
set : |
(* |
procedure for updating the field if it is mutable
| *) |
val is_mutable : ('t, 'r) t -> bool
is_mutable f = f.set != None