-----Mensaje original-----
From: Philip Prindeville
Sent: Friday, August 24, 2012 2:37 PM
> > On 8/23/12 3:34 AM, Brian Raven wrote:
> > I may be missing something, but if you want to test a GUI, wouldn't
> > something like Win32::GuiTest be more useful?
> >
> >
> > --
> > Brian Raven
>
> I could not get it to build on Win7-x64:
>
> C:\Users\philipp\Desktop\tests\Win32-GuiTest-1.60>vcvars32.bat
> Setting environment for using Microsoft Visual Studio 2010 x86 tools.
>
You're initializing the x86 vars, not x64 vars. I just tried the
installation of Win32::GuiTest from CPAN (with a script I wrote - called
"cpan" too - to automate those things because the regular cpan app didn't
work well for me for several reasons, but basically it downloads the latest
version from CPAN, checks for dependencies and installs the necessary with
MSVS vars set up and nmake). I installed Win32::GuiTest for Perl 5.16 x64.
This is the log of my script:
#######################
Setting environment for using Microsoft Visual Studio 2010 x64 tools.
D:\src>cpan Win32::GuiTest
Looking for module Win32::GuiTest
Win32::GuiTest is not installed. Fetching information and requirements.
Downloaded source from CPAN to folder D:/src/Win32-GuiTest-1.60
Checking dependencies for Win32::GuiTest (Win32::GuiTest)
This module requires me to install the following modules and dependencies:
Win32::GuiTest
Deciding best install order.
Done. Testing order:
OK! Win32::GuiTest
Do you want me to start the installation process? [y]
###############################################################################
Changing to dir D:/src/Win32-GuiTest-1.60
Checking if your kit is complete...
Looks good
Writing Makefile for Win32::GuiTest
Writing MYMETA.yml and MYMETA.json
Microsoft (R) Program Maintenance Utility Version 10.00.30319.01
Copyright (C) Microsoft Corporation. All rights reserved.
cp lib/Win32/GuiTest/GuiTest.pc blib\lib\Win32\GuiTest\GuiTest.pc
cp lib/Win32/GuiTest/Examples.pm blib\lib\Win32\GuiTest\Examples.pm
cp lib/Win32/GuiTest.pm blib\lib\Win32\GuiTest.pm
cp lib/Win32/GuiTest/Cmd.pm blib\lib\Win32\GuiTest\Cmd.pm
D:\usr\bin\perl.exe -ID:/usr/lib -ID:/usr/lib
D:\usr\lib\ExtUtils\xsubpp -typemap D:\usr\lib\ExtUtils\typemap -typemap
perlobject.map -typemap typemap GuiTest.xs >xstmp.c &&
D:\usr\bin\perl.exe -MExtUtils::Command -e mv -- xstmp.c GuiTest.cpp
cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -fp:precise -DWIN32
-D_CONSOLE -DNO_STRICT -DWIN64 -DCONSERVATIVE -D_CRT_SECURE_NO_DEPRECATE
-D_CRT_NONSTDC_NO_DEPRECATE
-DPERL_TEXTMODE_SCRIPTS -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT
-DPERL_IMPLICIT_SYS
-DUSE_PERLIO -MD -Zi -DNDEBUG -Ox -GL -fp:precise -DVERSION=\"1.60\"
-DXS_VERSION=\"1.60\"
"-ID:\usr\lib\CORE" GuiTest.cpp
GuiTest.cpp
GuiTest.xs(135) : warning C4267: '=' : conversion from 'size_t' to 'int',
possible loss of data
GuiTest.xs(153) : warning C4244: 'initializing' : conversion from 'WPARAM'
to 'int', possible loss of data
GuiTest.xs(154) : warning C4244: 'initializing' : conversion from 'LPARAM'
to 'int', possible loss of data
GuiTest.xs(159) : warning C4244: 'initializing' : conversion from 'WPARAM'
to 'int', possible loss of data
GuiTest.xs(160) : warning C4244: 'initializing' : conversion from 'LPARAM'
to 'BOOL', possible loss of data
GuiTest.xs(174) : warning C4244: 'initializing' : conversion from 'LPARAM'
to 'BOOL', possible loss of data
GuiTest.xs(274) : warning C4244: 'initializing' : conversion from 'WPARAM'
to 'int', possible loss of data
GuiTest.xs(278) : warning C4244: 'initializing' : conversion from 'WPARAM'
to 'int', possible loss of data
GuiTest.xs(609) : warning C4244: 'initializing' : conversion from 'LRESULT'
to 'int', possible loss of data
GuiTest.xs(1098) : warning C4244: 'initializing' : conversion from 'LRESULT'
to 'int', possible loss of data
GuiTest.xs(1115) : warning C4244: '=' : conversion from 'LRESULT' to 'int',
possible loss of data
GuiTest.xs(1152) : warning C4244: '=' : conversion from 'LRESULT' to 'int',
possible loss of data
GuiTest.xs(1410) : warning C4244: 'initializing' : conversion from 'LRESULT'
to 'int', possible loss of data
GuiTest.xs(1430) : warning C4244: 'initializing' : conversion from 'LRESULT'
to 'int', possible loss of data
GuiTest.xs(1460) : warning C4244: '=' : conversion from 'LRESULT' to 'int',
possible loss of data
GuiTest.xs(1473) : warning C4244: 'initializing' : conversion from 'LRESULT'
to 'int', possible loss of data
GuiTest.xs(1510) : warning C4267: '=' : conversion from 'size_t' to 'int',
possible loss of data
GuiTest.xs(1753) : warning C4244: '=' : conversion from 'IV' to 'LONG',
possible loss of data
cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -fp:precise -DWIN32
-D_CONSOLE -DNO_STRICT -DWIN64 -DCONSERVATIVE -D_CRT_SECURE_NO_DEPRECATE
-D_CRT_NONSTDC_NO_DEPRECATE
-DPERL_TEXTMODE_SCRIPTS -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT
-DPERL_IMPLICIT_SYS
-DUSE_PERLIO -MD -Zi -DNDEBUG -Ox -GL -fp:precise -DVERSION=\"1.60\"
-DXS_VERSION=\"1.60\"
"-ID:\usr\lib\CORE" DibSect.cpp
DibSect.cpp
DibSect.cpp(120) : warning C4334: '<<' : result of 32-bit shift implicitly
converted to 64 bits (was 64-bit shift intended?)
Running Mkbootstrap for Win32::GuiTest ()
D:\usr\bin\perl.exe -MExtUtils::Command -e chmod -- 644 GuiTest.bs
D:\usr\bin\perl.exe -MExtUtils::Mksymlists -e
"Mksymlists('NAME'=>\"Win32::GuiTest\", 'DLBASE' => 'GuiTest', 'DL_FUNCS' =>
{ }, 'FUNCLIST' => [], 'IMPORTS' => { }, 'DL_VARS' => []);"
link -out:blib\arch\auto\Win32\GuiTest\GuiTest.dll -dll -nologo
-nodefaultlib
-debug -opt:ref,icf -ltcg -libpath:"D:/usr/lib/CORE" -machine:AMD64
"/manifestdependency:type='Win32' name='Microsoft.Windows.Common-Controls'
version='6.0.0.0' processorArchitecture='*'
publicKeyToken='6595b64144ccf1df' language='*'" GuiTest.obj DibSect.obj
D:\usr\lib\CORE\perl516.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 comctl32.lib msvcrt.lib -def:GuiTest.def
Creating library blib\arch\auto\Win32\GuiTest\GuiTest.lib and object
blib\arch\auto\Win32\GuiTest\GuiTest.exp
Generating code
Finished generating code
if exist blib\arch\auto\Win32\GuiTest\GuiTest.dll.manifest
mt -nologo -manifest
blib\arch\auto\Win32\GuiTest\GuiTest.dll.manifest
-outputresource:blib\arch\auto\Win32\GuiTest\GuiTest.dll;2
if exist blib\arch\auto\Win32\GuiTest\GuiTest.dll.manifest del
blib\arch\auto\Win32\GuiTest\GuiTest.dll.manifest
D:\usr\bin\perl.exe -MExtUtils::Command -e chmod -- 755
blib\arch\auto\Win32\GuiTest\GuiTest.dll
D:\usr\bin\perl.exe -MExtUtils::Command -e cp -- GuiTest.bs
blib\arch\auto\Win32\GuiTest\GuiTest.bs
D:\usr\bin\perl.exe -MExtUtils::Command -e chmod -- 644
blib\arch\auto\Win32\GuiTest\GuiTest.bs
----------------------- TESTING ------------------------------
> nmake test
Microsoft (R) Program Maintenance Utility Version 10.00.30319.01
Copyright (C) Microsoft Corporation. All rights reserved.
D:\usr\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0,
'blib\lib', 'blib\arch')" t/*.t
t/01_basic.t ..... ok
t/02_calc.t ...... skipped: this test is phased out
t/03_cpl.t ....... ok
t/04_std.t ....... ok
t/05_which.t ..... ok
t/06_sendkeys.t .. ok
All tests successful.
Files=6, Tests=72, 7 wallclock secs ( 0.05 usr + 0.05 sys = 0.09 CPU)
Result: PASS
Do you want me to install? [y]
> nmake install
Microsoft (R) Program Maintenance Utility Version 10.00.30319.01
Copyright (C) Microsoft Corporation. All rights reserved.
Files found in blib\arch: installing files in blib\lib into architecture
dependent library tree
Installing D:\usr\site\lib\auto\Win32\GuiTest\GuiTest.bs
Installing D:\usr\site\lib\auto\Win32\GuiTest\GuiTest.dll
Installing D:\usr\site\lib\auto\Win32\GuiTest\GuiTest.exp
Installing D:\usr\site\lib\auto\Win32\GuiTest\GuiTest.lib
Installing D:\usr\site\lib\auto\Win32\GuiTest\GuiTest.pdb
Installing D:\usr\site\lib\Win32\GuiTest.pm
Installing D:\usr\site\lib\Win32\GuiTest\Cmd.pm
Installing D:\usr\site\lib\Win32\GuiTest\Examples.pm
Installing D:\usr\site\lib\Win32\GuiTest\GuiTest.pc
Appending installation info to D:/usr/lib/perllocal.pod
Done. Quiting now.
###############################
HTH
Francisco
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
