val struct_typ : range Ctypes.structure Ctypes.typval location : ( int, range Ctypes.structure ) Ctypes.fieldval length : ( int, range Ctypes.structure ) Ctypes.fieldval typ : range Ctypes.structure Ctypes.typtype t = {location : int; |
length : int; |
}val of_t : t -> ( range, [ `Struct ] ) Ctypes.structuredval to_t : ( range, [ `Struct ] ) Ctypes.structured -> t