If nobody has ever done so, someone should stop a Lisp machine that's been running for a while, examing the LIST regions of working-storage-area, and see how much storage CDR-coding is actually saving. It would be interesting to know.