let gstartof_value env ty v off =
    gstartof (memory_offset env ty (Value v) off)