| Subject: | CvPADLIST elements not included in total_size |
perl -MDevel::Size=total_size -e 'sub bar { my $var = "x" x 2**20; bar($_[0]-1) if $_[0];} bar(20);
warn total_size(\&bar)'
10962
The figure doesn't vary much regardless of the degree of recursion.