UNB/ CS/ David Bremner/ teaching/ cs4613/ lectures/ lecture22/ loopmut.rkt
#lang plai/gc2/mutator
(allocator-setup "generational.rkt" 240)

(define lst '(0))
(define (loop k acc)
  (if (> k 200)
      acc
      (loop (add1 k) (counter))))

(loop 0 0)