add `refcounts :: Refcount a -> [(a, Int)]`