Lisp?



(lambda ()
  (let ((counter 0))
    (lambda () (incf counter))))