[toronto-lisp] Pattern Matching Approaches in CL