[rt.cpan.org #55660] [PATCH] Partial win64 support for Win32::API

Wed Mar 02 17:44:18 2011: Request 55660 was acted upon.
Transaction: Correspondence added by dandv
       Queue: Win32-API
     Subject: [PATCH] Partial win64 support for Win32::API
   Broken in: (no value)
    Severity: (no value)
       Owner: COSIMO
  Requestors: [email protected], [email protected], [email protected]
      Status: open
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=55660 >


--> Working on Win32::API
Fetching http://search.cpan.org/CPAN/authors/id/C/CO/COSIMO/Win32-API-0.59.tar.gz
-> OK
Unpacking Win32-API-0.59.tar.gz
Entering Win32-API-0.59
Configuring Win32-API-0.55
Running Makefile.PL
Checking if your kit is complete...
Looks good
Writing Makefile for Win32::API::Callback
Writing Makefile for Win32::API
-> OK
Finding PREREQ from Makefile ...
Checking if you have Win32 0 ... Yes (0.39)
Building and testing Win32-API-0.55
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
C:\strawberry\perl\bin\perl.exe C:\strawberry\perl\lib\ExtUtils\xsubpp  -typemap C:\strawberry\perl\lib\ExtUtils\typemap  Callback.xs > Callback.xsc && C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "mv" -- Callback.xsc Callback.c
gcc -c   	-s -O2 -DWIN32 -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -fno-strict-aliasing -mms-bitfields -DPERL_MSVCRT_READFIX -s -O2 	  -DVERSION=\"0.59\" 	-DXS_VERSION=\"0.59\"  "-IC:\strawberry\perl\lib\CORE"   Callback.c
Callback.xs: In function 'CallbackMakeStruct':
Callback.xs:250: warning: cast from pointer to integer of different size
Callback.xs: In function 'CallbackTemplate':
Callback.xs:305: warning: cast to pointer from integer of different size
Callback.xs:313: warning: cast to pointer from integer of different size
Callback.xs: In function 'CallbackCreate':
Callback.xs:581: warning: cast from pointer to integer of different size
Callback.xs:596: warning: cast from pointer to integer of different size
Callback.xs:597: warning: cast from pointer to integer of different size
Callback.xs:637: warning: cast from pointer to integer of different size
Callback.xs:687: warning: cast from pointer to integer of different size
Callback.xs:738: warning: cast from pointer to integer of different size
Callback.xs: In function 'XS_Win32__API__Callback_CallbackCreate':
Callback.xs:868: warning: cast from pointer to integer of different size
Callback.xs: In function 'XS_Win32__API__Callback_PushSelf':
Callback.xs:896: warning: cast from pointer to integer of different size
Running Mkbootstrap for Win32::API::Callback ()
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 Callback.bs
C:\strawberry\perl\bin\perl.exe -MExtUtils::Mksymlists \
     -e "Mksymlists('NAME'=>\"Win32::API::Callback\", 'DLBASE' => 'Callback', 'DL_FUNCS' => {  }, 'FUNCLIST' => [], 'IMPORTS' => {  }, 'DL_VARS' => []);"
dlltool --def Callback.def --output-exp dll.exp
g++ -o ..\blib\arch\auto\Win32\API\Callback\Callback.dll -Wl,--base-file -Wl,dll.base -mdll -s -L"C:\strawberry\perl\lib\CORE" -L"C:\strawberry\c\lib" Callback.o -Wl,--image-base,0x21000000  C:\strawberry\perl\lib\CORE\libperl512.a -lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 -lmpr -lwinmm -lversion -lodbc32 -lodbccp32 -lcomctl32 dll.exp
dlltool --def Callback.def --base-file dll.base --output-exp dll.exp
g++ -o ..\blib\arch\auto\Win32\API\Callback\Callback.dll -mdll -s -L"C:\strawberry\perl\lib\CORE" -L"C:\strawberry\c\lib" Callback.o -Wl,--image-base,0x21000000  C:\strawberry\perl\lib\CORE\libperl512.a -lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 -lmpr -lwinmm -lversion -lodbc32 -lodbccp32 -lcomctl32 dll.exp 
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "chmod" -- 755 ..\blib\arch\auto\Win32\API\Callback\Callback.dll
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "cp" -- Callback.bs ..\blib\arch\auto\Win32\API\Callback\Callback.bs
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 ..\blib\arch\auto\Win32\API\Callback\Callback.bs
C:\strawberry\perl\bin\perl.exe C:\strawberry\perl\lib\ExtUtils\xsubpp  -typemap C:\strawberry\perl\lib\ExtUtils\typemap -typemap typemap  API.xs > API.xsc && C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "mv" -- API.xsc API.c
gcc -c   	-s -O2 -DWIN32 -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -fno-strict-aliasing -mms-bitfields -DPERL_MSVCRT_READFIX -s -O2 	  -DVERSION=\"0.59\" 	-DXS_VERSION=\"0.59\"  "-IC:\strawberry\perl\lib\CORE"   API.c
API.xs: In function 'XS_Win32__API_GetProcAddress':
API.xs:127: warning: cast from pointer to integer of different size
API.xs: In function 'XS_Win32__API_PointerTo':
API.xs:206: warning: cast from pointer to integer of different size
API.xs: In function 'XS_Win32__API_ReadMemory':
API.xs:223: warning: cast to pointer from integer of different size
C:\Users\A\AppData\Local\Temp\ccyvhME8.s: Assembler messages:
C:\Users\A\AppData\Local\Temp\ccyvhME8.s:3129: Error: suffix or operands invalid for `push'
C:\Users\A\AppData\Local\Temp\ccyvhME8.s:3132: Error: suffix or operands invalid for `push'
dmake.exe:  Error code 129, while making 'API.o'