in the srfi-1 document the example for “pair-fold” has an extra closing brace:

(pair-fold (lambda (pair tail) (set-cdr! pair tail) pair) '() lis))

better would be:

(pair-fold (lambda (pair tail) (set-cdr! pair tail) pair) '() lis)

Sorry if this is the wrong place, but the srfi-1 list seems to be quite dead.