Instead of line 49 and this, can't this be
```ocaml
Lwt.finalize
  (Lwt_preemptive.detach t)
  (fun () -> ...)
```