Generator in common lisp. #lisp