Rename copy-to-r to copy-to-r! in test