module Dbf_types: sig endmodule M: sig endmodule V1: sig endmodule Current: sig endval readers : (string * (Pervasives.in_channel -> V1.schema)) listval current_version : stringval write : string -> Current.schema -> unitval read : string -> Current.schema