Many more tests for (setf c*r) so that we are sure that the function #'(setf c*r) is used in addition to the setf expander.
Many more tests for (setf c*r) so that we are sure
that the function #'(setf c*r) is used in addition
to the setf expander.

clasp-developers/SICL,clasp-developers/SICL,vtomole/SICL,clasp-developers/SICL,clasp-developers/SICL,vtomole/SICL,vtomole/SICL,vtomole/SICL