(long_to_cons): Fix type of top.