Trivial implementation of QUIT for many Common Lisps.