#+allegro allow keyword arguments onto asdf:traverse defmethod lambda