Fri Oct 19 08:47:40 2012: Request 80217 was acted upon.
Transaction: Correspondence added by JDHEDDEN
Queue: Win32-API
Subject: Re: [rt.cpan.org #80217] Build failure under Cygwin on Windows
Broken in: 0.72
Severity: Critical
Owner: Nobody
Requestors: [email protected]
Status: open
Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=80217 >
On Fri, Oct 19, 2012 at 1:42 AM, Daniel Dragan via RT
<[email protected]> wrote:
> <URL: https://rt.cpan.org/Ticket/Display.html?id=80217 >
> New version posted at https://github.com/bulk88/perl5-win32-api . It
> passed all tests for my 32 bit with Quads Cygwin Perl. Please try it and
> report back.
With Cygwin 1.7 and Perl 5.16.1, there is the following test failure:
> perl -Mblib Callback/t/03_Jim_Shaw.t
1..6
ok 1 - use Win32::API;
ok 2 - use Win32::API::Callback;
ok 3 - use Win32::API::Test;
ok 4 - loaded
get_window_pids: Desktop hwnd: 65556
Invalid type '-' in unpack at
/c/_/Xfer/bulk88-perl5-win32-api-patched/blib/lib/Win32/API/Callback.pm
line 188.
# Looks like you planned 6 tests but ran 4.
# Looks like your test exited with 255 just after 4.
Uncommenting the Data::Dumper command on line 189 of Callback.pm products:
> perl -Mblib Callback/t/03_Jim_Shaw.t
1..6
ok 1 - use Win32::API;
ok 2 - use Win32::API::Callback;
ok 3 - use Win32::API::Test;
ok 4 - loaded
get_window_pids: Desktop hwnd: 65556
$VAR1 = [
'ܨ"',
'è¤B~',
'V',
''
];
$VAR1 = [
'ܨ"',
'è¤B~',
'X',
''
];
$VAR1 = [
'ܨ"',
'è¤B~',
'–',
''
];
$VAR1 = [
'ܨ"',
'è¤B~',
'¨',
''
];
$VAR1 = [
'ܨ"',
'è¤B~',
'X%',
''
];
$VAR1 = [
'ܨ"',
'è¤B~',
'5',
''
];
$VAR1 = [
'ܨ"',
'è¤B~',
'8d',
''
];
Invalid type '-' in unpack at
/c/_/Xfer/bulk88-perl5-win32-api-patched/blib/lib/Win32/API/Callback.pm
line 188.
# Looks like you planned 6 tests but ran 4.
# Looks like your test exited with 255 just after 4.
I see a '-' in the third $vAR1, but it's beyond me what the issue is.