getLastSeenComplete :: MonadIO m =>  TorrentStatus -> m C.CTime
getLastSeenComplete ho =
  liftIO . withPtr ho $ \hoPtr ->
  [CU.exp| time_t { $(torrent_status * hoPtr)->last_seen_complete } |]
getLastSeenComplete :: MonadIO m =>  TorrentStatus -> m C.CTime
getLastSeenComplete ho =
  liftIO . withPtr ho $ \hoPtr ->
  [CU.exp| time_t { $(torrent_status * hoPtr)->last_seen_complete } |]
getLastSeenComplete ho =
  liftIO . withPtr ho $ \hoPtr ->
  [CU.exp| time_t { $(torrent_status * hoPtr)->last_seen_complete } |]