let c_object_of_data ~indir d = let t = ctype_of_data d in let t = if indir then Cil.typeOf_pointed t else t in Ctypes.object_of t