Module Dfm


module Dfm: sig .. end


type value_type =
| VaNull
| VaList
| VaInt8
| VaInt16
| VaInt32
| VaExtended
| VaString
| VaIdent
| VaFalse
| VaTrue
| VaBinary
| VaSet
| VaLString
| VaNil
| VaCollection
| VaSingle
| VaCurrency
| VaDate
| VaWString
| VaInt64
| VaUTF8String
| VaDouble
val min_value : value_type
val max_value : value_type

type filer_flag =
| FfInherited
| FfChildPos
| FfInline
type filer_flags = int 
val set_of_ff : filer_flag -> filer_flags
val filer_signature : string
type byte_array = (int, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t 
type variant = [ `binary of byte_array
| `bool of bool
| `char of char
| `currency of float
| `efloat of float * (int64 * int)
| `float of float
| `int of int
| `int32 of int32
| `int64 of int64
| `nil
| `null
| `sfloat of float
| `string of string
| `tag of string
| `time of float
| `wchar of int
| `wstring of Unicode.utf16_string ]
val datetime_of_unixtime : float -> float
val unixtime_of_datetime : float -> float
val extended_of_float : float -> int64 * int
val float_of_extended : int64 * int -> float
module Writer: sig .. end
module Reader: sig .. end