Scheme

Posted volcanorao

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Scheme相关的知识,希望对你有一定的参考价值。

● 闭包

(define counter
  (let ([next 0])
    (lambda ()
      (set! next (+ next 1))
      next)))

(counter)

(counter)

 

(define make-counter
  (lambda ()
    (let ([count 0])
      (lambda ()
        (set! count (+ count 1))
        count))))

(define counter (make-counter))
(counter)
(counter)
(counter)

以上是关于Scheme的主要内容,如果未能解决你的问题,请参考以下文章

CEGUI资源加载流程