>>35
トップレベルじゃなくて、関数の中でやってみれば？
(define (f)
　(define cc '())
　(define v 5)
　(call/cc (lambda(x) (set! cc x) v))
　(display v)(newline) ;チェック用
　(set! v (+ v 1))
　(cc v)
)
(f) ;無限ループ