Context-oriented software transactional memory in common lisp