A high-performance Common Lisp implementation of composable Transactional Memory (TM).