Start 2009-05-27T16:09:37
ActivePerl-1003 CPAN-1.94
LIB=C:\PROGRA~1\MICROS~4\VC98\Lib\PSDK;C:\PROGRA~1\MICROS~2\Lib;C:\PROGRA~1\MICROS~4\VC98\Lib;C:\PROGRA~1\MICROS~4\VC98\MFC\Lib
INCLUDE=C:\PROGRA~1\MICROS~2\Include;C:\PROGRA~1\MICROS~4\VC98\ATL\Include;C:\PROGRA~1\MICROS~4\VC98\Include;C:\PROGRA~1\MICROS~4\VC98\MFC\Include
PATH=C:\PROGRA~1\MICROS~2\Bin;C:\PROGRA~1\MICROS~2\Bin\WinNT;C:\PROGRA~1\MICROS~4\VC98\Bin;C:\PROGRA~1\MICROS~4\Common\MSDev98\Bin;C:\Perl\site\bin;C:\Perl\bin;C:\cygwin\bin;C:\mingw\bin;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WINDOW~2\v1.0
Going to read 'C:\cpanfly\var\cpan\Metadata'
Database was generated on Wed, 27 May 2009 08:27:48 GMT
______________________ D i s t r o P r e f s ______________________
Win32-API.yml[0]
Running make for C/CO/COSIMO/Win32-API-0.58.tar.gz
Checksum for C:\cpanfly\var\cpan\sources\authors\id\C\CO\COSIMO\Win32-API-0.58.tar.gz ok
Win32-API-0.58/
Win32-API-0.58/api-test/
Win32-API-0.58/api-test/API_test.cpp
Win32-API-0.58/api-test/API_test.def
Win32-API-0.58/api-test/API_test.dsp
Win32-API-0.58/api-test/API_test.dsw
Win32-API-0.58/api-test/API_test.h
Win32-API-0.58/api-test/API_test.sln
Win32-API-0.58/api-test/API_test.suo
Win32-API-0.58/api-test/API_test.vcproj
Win32-API-0.58/api-test/Debug/
Win32-API-0.58/api-test/Debug/API_test.dll
Win32-API-0.58/api-test/Debug/API_test.lib
Win32-API-0.58/api-test/Makefile
Win32-API-0.58/api-test/Release/
Win32-API-0.58/api-test/Release/API_test.dll
Win32-API-0.58/api-test/Release/API_test.lib
Win32-API-0.58/api-test/StdAfx.cpp
Win32-API-0.58/api-test/StdAfx.h
Win32-API-0.58/API.h
Win32-API-0.58/API.pm
Win32-API-0.58/API.xs
Win32-API-0.58/API_test.dll
Win32-API-0.58/Callback/
Win32-API-0.58/Callback/Callback.xs
Win32-API-0.58/Callback/Makefile.PL
Win32-API-0.58/Callback/t/
Win32-API-0.58/Callback/t/02_Callback.t
Win32-API-0.58/Callback.pm
Win32-API-0.58/Changes
Win32-API-0.58/Makefile.PL
Win32-API-0.58/MANIFEST
Win32-API-0.58/META.yml
Win32-API-0.58/README
Win32-API-0.58/samples/
Win32-API-0.58/samples/callback1.pl
Win32-API-0.58/samples/callback2.pl
Win32-API-0.58/samples/callback3.pl
Win32-API-0.58/samples/cdinfo.pl
Win32-API-0.58/samples/chres.pl
Win32-API-0.58/samples/ejectcd.pl
Win32-API-0.58/samples/GetCursorPos.pl
Win32-API-0.58/samples/hideconsole.pl
Win32-API-0.58/samples/kernel32.html
Win32-API-0.58/samples/kernel32.pl
Win32-API-0.58/samples/locales.pl
Win32-API-0.58/samples/resolution.pl
Win32-API-0.58/samples/rndcolors.pl
Win32-API-0.58/samples/Win32/
Win32-API-0.58/samples/Win32/kernel32.pm
Win32-API-0.58/samples/wininfo.pl
Win32-API-0.58/Struct.pm
Win32-API-0.58/t/
Win32-API-0.58/t/00_API.t
Win32-API-0.58/t/01_Struct.t
Win32-API-0.58/t/02_GetProcess.t
Win32-API-0.58/t/03_undef.t
Win32-API-0.58/Test.pm
Win32-API-0.58/Type.pm
Win32-API-0.58/TYPEMAP
Going to apply 1 patch:
C:\cpanfly\etc\distroprefs\Win32-API-0.58.patch
C:\cygwin\bin\patch.exe -N --fuzz=3 -p1 <<EOT
--- Win32-API-0.58/Callback/t/02_Callback.t.orig 2008-10-16 12:33:10.000000000 -0700
+++ Win32-API-0.58/Callback/t/02_Callback.t 2009-05-27 15:56:14.229375000 -0700
@@ -52,8 +52,7 @@
SKIP: {
- skip('because callbacks currently /SEGFAULT/ all compilers but MSVC 6+', 1)
- unless $cc_name eq 'cl' && $cc_vers >= 12;
+ skip('because callbacks currently /SEGFAULT/ all compilers', 1);
$result = $function->Call( $callback, 21 );
is($result, 42, 'callback function works');
EOT
(Stripping trailing CRs from patch.)
patching file Callback/t/02_Callback.t
CPAN.pm: Going to build C/CO/COSIMO/Win32-API-0.58.tar.gz
>>> C:\Perl\bin\perl.exe Makefile.PL
Checking if your kit is complete...
Looks good
Writing Makefile for Win32::API::Callback
Writing Makefile for Win32::API
>>> nmake
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
cp Type.pm blib\lib\Win32/API/Type.pm
cp Callback.pm blib\lib\Win32/API/Callback.pm
cp Test.pm blib\lib\Win32/API/Test.pm
cp Struct.pm blib\lib\Win32/API/Struct.pm
cp API.pm blib\lib\Win32/API.pm
nmake -f Makefile all -nologo
C:\Perl\bin\perl.exe C:\cpanfly\var\megalib\ExtUtils\xsubpp -typemap C:\Perl\lib\ExtUtils\typemap Callback.xs > Callback.xsc && C:\Perl\bin\perl.exe -MExtUtils::Command -e mv Callback.xsc Callback.c
cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -MD -Zi -DNDEBUG -O1 -DVERSION=\"0.58\" -DXS_VERSION=\"0.58\" "-IC:\Perl\lib\CORE" Callback.c
Callback.c
Callback.xs(524) : warning C4018: '<' : signed/unsigned mismatch
Callback.xs(623) : warning C4018: '<' : signed/unsigned mismatch
Running Mkbootstrap for Win32::API::Callback ()
C:\Perl\bin\perl.exe -MExtUtils::Command -e chmod 644 Callback.bs
C:\Perl\bin\perl.exe -MExtUtils::Mksymlists -e "Mksymlists('NAME'=>\"Win32::API::Callback\", 'DLBASE' => 'Callback', 'DL_FUNCS' => { }, 'FUNCLIST' => [], 'IMPORTS' => { }, 'DL_VARS' => []);"
link -out:..\blib\arch\auto\Win32\API\Callback\Callback.dll -dll -nologo -nodefaultlib -debug -opt:ref,icf -libpath:"C:\Perl\lib\CORE" -machine:x86 Callback.obj C:\Perl\lib\CORE\perl510.lib oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib -def:Callback.def
Creating library ..\blib\arch\auto\Win32\API\Callback\Callback.lib and object ..\blib\arch\auto\Win32\API\Callback\Callback.exp
if exist ..\blib\arch\auto\Win32\API\Callback\Callback.dll.manifest mt -nologo -manifest ..\blib\arch\auto\Win32\API\Callback\Callback.dll.manifest -outputresource:..\blib\arch\auto\Win32\API\Callback\Callback.dll;2
if exist ..\blib\arch\auto\Win32\API\Callback\Callback.dll.manifest del ..\blib\arch\auto\Win32\API\Callback\Callback.dll.manifest
C:\Perl\bin\perl.exe -MExtUtils::Command -e chmod 755 ..\blib\arch\auto\Win32\API\Callback\Callback.dll
C:\Perl\bin\perl.exe -MExtUtils::Command -e cp Callback.bs ..\blib\arch\auto\Win32\API\Callback\Callback.bs
C:\Perl\bin\perl.exe -MExtUtils::Command -e chmod 644 ..\blib\arch\auto\Win32\API\Callback\Callback.bs
cd ..
C:\Perl\bin\perl.exe C:\cpanfly\var\megalib\ExtUtils\xsubpp -typemap C:\Perl\lib\ExtUtils\typemap -typemap typemap API.xs > API.xsc && C:\Perl\bin\perl.exe -MExtUtils::Command -e mv API.xsc API.c
cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -MD -Zi -DNDEBUG -O1 -DVERSION=\"0.58\" -DXS_VERSION=\"0.58\" "-IC:\Perl\lib\CORE" API.c
API.c
API.xs(339) : warning C4244: '=' : conversion from 'double ' to 'float ', possible loss of data
API.xs(616) : warning C4244: '=' : conversion from 'double ' to 'float ', possible loss of data
Running Mkbootstrap for Win32::API ()
C:\Perl\bin\perl.exe -MExtUtils::Command -e chmod 644 API.bs
C:\Perl\bin\perl.exe -MExtUtils::Mksymlists -e "Mksymlists('NAME'=>\"Win32::API\", 'DLBASE' => 'API', 'DL_FUNCS' => { }, 'FUNCLIST' => [], 'IMPORTS' => { }, 'DL_VARS' => []);"
link -out:blib\arch\auto\Win32\API\API.dll -dll -nologo -nodefaultlib -debug -opt:ref,icf -libpath:"C:\Perl\lib\CORE" -machine:x86 API.obj C:\Perl\lib\CORE\perl510.lib oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib -def:API.def
Creating library blib\arch\auto\Win32\API\API.lib and object blib\arch\auto\Win32\API\API.exp
if exist blib\arch\auto\Win32\API\API.dll.manifest mt -nologo -manifest blib\arch\auto\Win32\API\API.dll.manifest -outputresource:blib\arch\auto\Win32\API\API.dll;2
if exist blib\arch\auto\Win32\API\API.dll.manifest del blib\arch\auto\Win32\API\API.dll.manifest
C:\Perl\bin\perl.exe -MExtUtils::Command -e chmod 755 blib\arch\auto\Win32\API\API.dll
C:\Perl\bin\perl.exe -MExtUtils::Command -e cp API.bs blib\arch\auto\Win32\API\API.bs
C:\Perl\bin\perl.exe -MExtUtils::Command -e chmod 644 blib\arch\auto\Win32\API\API.bs
COSIMO/Win32-API-0.58.tar.gz
nmake -- OK
Running make test
>>> nmake test TEST_VERBOSE=1
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
nmake -f Makefile all -nologo
cd ..
C:\Perl\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib\lib', 'blib\arch')" t/*.t
# API_Test.dll found at (API_test.dll)
Argument "japh" isn't numeric in pack at C:\cpanfly\var\cpan\build\Win32-API-0.58-sSBoPz\blib\lib/Win32/API/Type.pm line 200.
t/00_API.t .........
1..25
ok 1 - use Win32::API;
ok 2 - use Win32::API::Test;
ok 3 - use Win32;
ok 4 - loaded
ok 5 - found API_Test.dll
ok 6 - GetCurrentProcessId() function found
ok 7 - GetCurrentProcessId() result ok
ok 8 - GetCurrentProcessId() result ok
ok 9 - Import of GetCurrentProcessId() function from kernel32.dll
ok 10 - GetCurrentProcessId() result ok
ok 11 - sum_integers() function defined
ok 12 - function call with integer arguments and return value
ok 13 - sum_integers_ref() function defined
ok 14 - sum_integers_ref() returns the expected value
ok 15 - sum_integers_ref() correctly modifies its ref argument
ok 16 # skip because function call with double as return type isn't tested
ok 17 # skip because function call with double as return type isn't tested
ok 18 - sum_doubles_ref() function defined
ok 19 - sum_doubles_ref() call works
ok 20 - sum_floats() function defined
ok 21 # skip because function call with floats segfaults
ok 22 - sum_floats_ref() function defined
ok 23 - sum_floats_ref() returns the expected value (1)
ok 24 - find_char() function defined
ok 25 - find_char() function call works
find_char: got 'japh', 'a'
find_char: tmp now 'japh'
find_char: tmp now 'aph'
ok
# $^E=
t/01_Struct.t ......
1..7
ok 1 - use Win32::API;
ok 2 - use Win32::API::Test;
ok 3 - loaded
ok 4 - found API_Test.dll
ok 5 - mangle_simple_struct() function
ok 6 - mangling of simple structures work
ok 7 - tied interface works
dump_struct:
00: 0x05
01: 0x00
02: 0x00
03: 0x00
04: 0xc4
05: 0x5f
06: 0x22
07: 0x00
08: 0x00
09: 0x00
10: 0x00
11: 0x00
12: 0x00
13: 0x00
14: 0x04
15: 0x40
16: 0x00
17: 0x00
18: 0x00
19: 0x00
20: 0x20
21: 0x00
22: 0x00
23: 0x00
24: 0xe0
dump_struct: [mine at 0x0140f908] a=5 b=2.500000 c=0x00000000
dump_struct:
00: 0x05
01: 0x00
02: 0x00
03: 0x00
04: 0x00
05: 0x00
06: 0x00
07: 0x00
08: 0x00
09: 0x00
10: 0x00
11: 0x00
12: 0x00
13: 0x00
14: 0x04
15: 0x40
16: 0x2c
17: 0x08
18: 0xa4
19: 0x01
20: 0x00
21: 0x00
22: 0x00
23: 0x00
24: 0x00
dump_struct: [yours at 0x01a40e04] a=5 b=2.500000 c=0x01a4082c 'test'
x.a=2
x.b=5.000000
x.c=0x01a4082c
x.c='test'
char='t' toupper='T'
char='e' toupper='E'
char='s' toupper='S'
char='t' toupper='T'
dump_struct:
00: 0x05
01: 0x00
02: 0x00
03: 0x00
04: 0xc4
05: 0x5f
06: 0x22
07: 0x00
08: 0x00
09: 0x00
10: 0x00
11: 0x00
12: 0x00
13: 0x00
14: 0x04
15: 0x40
16: 0x00
17: 0x00
18: 0x00
19: 0x00
20: 0x20
21: 0x00
22: 0x00
23: 0x00
24: 0xe0
dump_struct: [mine at 0x0140f908] a=5 b=2.500000 c=0x00000000
dump_struct:
00: 0x05
01: 0x00
02: 0x00
03: 0x00
04: 0x00
05: 0x00
06: 0x00
07: 0x00
08: 0x00
09: 0x00
10: 0x00
11: 0x00
12: 0x00
13: 0x00
14: 0x04
15: 0x40
16: 0xe4
17: 0x90
18: 0x96
19: 0x01
20: 0x00
21: 0x00
22: 0x00
23: 0x00
24: 0x00
dump_struct: [yours at 0x01968cfc] a=5 b=2.500000 c=0x019690e4 'test'
x.a=2
x.b=5.000000
x.c=0x019690e4
x.c='test'
char='t' toupper='T'
char='e' toupper='E'
char='s' toupper='S'
char='t' toupper='T'
ok
# $result=8164
# $$=8164
t/02_GetProcess.t ..
1..3
ok 1 - use Win32::API;
ok 2 - kernel32!GetCurrentProcessId import successful
ok 3 - kernel32!GetCurrentProcessId() == Perl's $$
ok
# Win32::API 0.58
# Import:
t/03_undef.t .......
1..3
ok 1 - import sample API (PeekNamedPipe)
ok 2 - reclaiming child worked
ok 3 - (RT \#39730) sample API (PeekNamedPipe) works with undef values
ok
All tests successful.
Files=4, Tests=38, 1 wallclock secs ( 0.02 usr + 0.05 sys = 0.06 CPU)
Result: PASS
nmake test -nologo
C:\Perl\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0, '..\blib\lib', '..\blib\arch')" t/*.t
# Compiler name:cl
# Compiler version:12
# $^E=
t/02_Callback.t .. ok
All tests successful.
Files=1, Tests=8, 0 wallclock secs ( 0.00 usr + 0.03 sys = 0.03 CPU)
Result: PASS
cd ..
COSIMO/Win32-API-0.58.tar.gz
nmake test TEST_VERBOSE=1 -- OK
Fetching with LWP:
http://cpan.nas.activestate.com/authors/id/C/CO/COSIMO/CHECKSUMS
DISTNAME-VERSION 'Win32-API-0.55' found in META.yml is bogus, ignoring at C:\cpanfly\lib/Fly/MakePPD.pm line 131.
<SOFTPKG NAME="Win32-API" VERSION="0.58" DATE="2009-01-17">
<AUTHOR CPAN="COSIMO">Cosimo Streppone <cosimo@cpan.org></AUTHOR>
<ABSTRACT>Perl Win32 API Import Facility</ABSTRACT>
<ARCHITECTURE NAME="MSWin32-x86-multi-thread-5.10"/>
<CODEBASE HREF="Win32-API-0.58.tar.gz"/>
<PROVIDE NAME="Win32::API" VERSION="0.58"/>
<PROVIDE NAME="Win32::API::Callback" VERSION="0.58"/>
<PROVIDE NAME="Win32::API::Struct" VERSION="0.50"/>
<PROVIDE NAME="Win32::API::Test"/>
<PROVIDE NAME="Win32::API::Type" VERSION="0.58"/>
<REQUIRE NAME="Win32::"/>
<!-- Built 2009-05-27 with ActivePerl-1003 on cpanfly-w2003 (Windows 2003 Service Pack 2) -->
</SOFTPKG>
>>> (cd C:\cpanfly\var\cpan\build\Win32-API-0.58-sSBoPz && tar cvf - Win32-API-0.58.ppd blib) | gzip -c >C:/cpanfly/var/REPO/C/CO/COSIMO/Win32-API-0.58.tar.gz
Win32-API-0.58.ppd
blib/
blib/arch/
blib/arch/auto/
blib/arch/auto/Win32/
blib/arch/auto/Win32/API/
blib/arch/auto/Win32/API/API.bs
blib/arch/auto/Win32/API/API.dll
blib/arch/auto/Win32/API/API.exp
blib/arch/auto/Win32/API/API.lib
blib/arch/auto/Win32/API/Callback/
blib/arch/auto/Win32/API/Callback/Callback.bs
blib/arch/auto/Win32/API/Callback/Callback.dll
blib/arch/auto/Win32/API/Callback/Callback.exp
blib/arch/auto/Win32/API/Callback/Callback.lib
blib/lib/
blib/lib/Win32/
blib/lib/Win32/API/
blib/lib/Win32/API/Callback.pm
blib/lib/Win32/API/Struct.pm
blib/lib/Win32/API/Test.pm
blib/lib/Win32/API/Type.pm
blib/lib/Win32/API.pm
>>> mv C:\cpanfly\var\cpan\build\Win32-API-0.58-sSBoPz/Win32-API-0.58.ppd C:/cpanfly/var/REPO/C/CO/COSIMO
Finished 2009-05-27T16:09:47