Safe cleanup blocks, Common Lisp style - View it on GitHub