* src/objcodes.c (make_objcode_by_mmap): Fixed the error type when the

[bpt/guile.git] / testsuite / t-closure.scm

(let ((x 2))
  (lambda ()
    (let ((x++ (+ 1 x)))
      (set! x x++)
      x++)))