[plt-scheme] pseudo statics

Somewhere is a discussion about code like:

(define counter
    (let ((a 0))
      (lambda ()
        (set! a (+ 1 a))
        a)))

I just can't remember where! Anyone have any useful pointers or such?

--hsm