# New Ticket Created by  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

Reply via email to