Convert (setf env (register env ...)) into (extend env ...)
Convert (setf env (register env ...)) into (extend env ...)

darcs-hash:20050816084720-dd2a1-0128a7e339351d24dfbd96f7d26287b41d98830c.gz

angavrilov/cl-walker