module Record_internal: sig .. end
sig
end
type '_ field =
'_
|
Field : ('record, 'a) Variant_and_record_intf.M.Field.t -> 'record field
('record, 'a) Variant_and_record_intf.M.Field.t
'record field
type 'record fields = {
'record
get : 'field. ('record, 'field) Variant_and_record_intf.M.Field.t -> 'field;
'field. ('record, 'field) Variant_and_record_intf.M.Field.t -> 'field
type 'a t = {
'a
typename : 'a Typename.t;
'a Typename.t
fields : 'a field array;
'a field array
has_double_array_tag : bool;
bool
create : 'a fields -> 'a;
'a fields -> 'a