各位好
因為實在搞不懂 call/cc 以及一些環境, scope 的問題, 想要請教一下
(define var 0)
(let
((cont ( call/cc (lambda (k) (k k)) )))
(set! var (+ var 1))
(display var) (newline)
(cond ((< var 10) (define var 9) (display var) (newline) (cont cont))
(#t #t)))
以上這段程式 到底該輸出什麼呢?
若沒有亮白色那段, 輸出應該就是
1 1 2 2 ... 9 9 10
但是有亮白色這段 還會是這樣嗎? chicken 編譯器跑出來變 1 9 10 @@