type table = {
mutable ta_name : string ;
mutable ta_comment : string ;
mutable ta_columns : column list ;
mutable ta_atts : int list ;
(** later, table attributes *) |
mutable ta_indexes : int list ;
(** later, indexes on various columns *) |
}