getIpFilterApplies :: MonadIO m =>  TorrentStatus -> m Bool
getIpFilterApplies ho =
  liftIO . withPtr ho $ \hoPtr ->
  toBool <$> [CU.exp| bool { $(torrent_status * hoPtr)->ip_filter_applies } |]
getIpFilterApplies :: MonadIO m =>  TorrentStatus -> m Bool
getIpFilterApplies ho =
  liftIO . withPtr ho $ \hoPtr ->
  toBool <$> [CU.exp| bool { $(torrent_status * hoPtr)->ip_filter_applies } |]
getIpFilterApplies ho =
  liftIO . withPtr ho $ \hoPtr ->
  toBool <$> [CU.exp| bool { $(torrent_status * hoPtr)->ip_filter_applies } |]