code duplication: (setq r (concatenate 'string r (format nil ...



Hi,

I wrote a function where half of the code starts with:

setq r (concatenate 'string r (format nil ...

Is there a better way to do it?

Jack
.