cstruct-lwt 0