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