[Fluxus] pdata-map! memory leak?

[gabor papp]

i've been trying to narrow down the memory leak, which occurs with 
scripts running for a long time. we surmised that it was connected to 
constantly destroying and deleting polygon primitives. i could not 
confirm this, although i might have found some leaking with pdata-map!.

(clear)
(define p (build-particles 65536))

(every-frame
    (begin
        (with-primitive p
            (pdata-map! (lambda (c) 1) "c")
            (pdata-map!
                (lambda (p)
                    (crndvec))
                "p"))
        (collect-garbage)
        (dump-memory-stats)))

this script leaks about 200k memory on my system in 10 minutes. i 
thought we registered something wrong with the garbage collector when 
passing data between scheme and c++, but could not found anything, even 
with the help of the racket list. i'm kind of stuck, posting the script 
hoping that someone can confirm the leak and/or has some ideas how to 
fix it.

best,
gabor