(let ((c #\C)) (format nil "~C ~:C ~@C ~:@C" c c c c))

"C C #\\C C"