(library (rnrs mutable-pairs)
  (export set-car! set-cdr!)
  (import (scheme base)))