[perl-win32-gui-hackers] Possible WinXP memory leak [Was: Commit]

[Robert M. <rm...@po...>]

Chris Wearn wrote:
> Checked out latest (25/06/2006 about 1:40AM GMT)... compiled, tested, 
> installed all okay.

Thanks for the report.

> Ran code below and watched memory in task manager diminish...
> Running on Windows XP Professional SP2, Intel CPU (P4 2.4GHz), 1GB RAM...
> Installed: ActivePerl 5.8.7 build 815, VC6++

Robert May wrote previously:
>>But I can't duplicate the memory leak reported (perl 5.8.7 813,
>>Win32::GUI 1.03, win98 and win2k).  Jez reports this as still happening
>>on WinXP - can anyone else duplicate a memory leak running this code:

This is looking like an XP thing at the moment.  Can either of you 
reduce the problem to something that doesn't need Win32::GUI?  I.e. can 
we find out if it's a window creation/deletion thing, or a perl thing?

Does it still leak if we only create a window (without the button)?

Can someone run this with a fixed number of iterations, and tell me how 
much memory is leaked per iteration?

Is all the memory returned when the app exits?

I can confirm that I don't see this problem in win98, and will re-test 
win2k tomorrow.

Regards,
Rob.

> use strict;
> use Win32::GUI;
> 
> my ($W,$but);
> while (1) {
> $W = new Win32::GUI::Window(
> #-name => "TestWindow",
> -pos => [ 0, 0],
> -size => [210, 200],
> -text => "TestWindow",
> );
> 
> $but=$W->AddButton(
> #-name => "test",
> -text => "Button 1",
> -size => [ 70, 22 ],
> -pos => [ 20, 20 ],
> );
> }