[perl #70183] [BUG] Recently introduced memory leak in loops
Carlin Bingham
# Please include the string: [perl #70183]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=70183 >
This did not occur in 657d55cce1f1ded33fd1f731344bd31b33099cb8 but is
present in 6b04b37bb3c06bfb5eb306844b3efbbd54a357cc onwards (I wasn't
unable to get the revisions in between to run).
For example:
loop { my $x = 1; }
The idle REPL from 657d55cce allocated 48.1 MiB (according to System
Monitor). After running that loop for 10 minutes it sat at a constant
49.6 MiB.
Before killing the process, 'free -m' reported:
total used free shared buffers cached
Mem: 3900 2620 1279 0 341 1282
After killing, it reported:
Mem: 3900 2570 1330 0 341 1282
The latest Rakudo (74f561eb77cfe4d7384c1a82ab484d7b63ba8073) allocated
50.8MiB on opening on the REPL.
After 5 minutes of running that loop it had allocated 1GiB.
Before stopping it:
total used free shared buffers cached
Mem: 3900 3650 249 0 341 1282
After:
Mem: 3900 2567 1332 0 341 1282
--
Carlin