Modified cl-get-setf-expansion to use cl-gensym.