For the pet and mount collectors out there, here is a macro I learned of from Drey; it’s short and sweet.

/run print ('Mounts: ' .. GetNumCompanions("MOUNT") .. ", Pets: " .. GetNumCompanions("CRITTER"))