An implementation of RFC 2388 in Common Lisp