#lang plai/gc2/mutator
(allocator-setup "incremental.rkt" 256)
  (define (sum lst)
    (cond
      [(empty? lst) 0]
      [else (+ (first lst) (sum (rest lst)))]))

(sum '(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23))