Start 2010-05-07T12:07:32 ActivePerl-1200 CPAN-1.9402 LIB=C:\PROGRA~1\MICROS~3\VC98\Lib\PSDK;C:\PROGRA~1\MICROS~2\Lib;C:\PROGRA~1\MICROS~3\VC98\Lib;C:\PROGRA~1\MICROS~3\VC98\MFC\Lib INCLUDE=C:\PROGRA~1\MICROS~2\Include;C:\PROGRA~1\MICROS~3\VC98\ATL\Include;C:\PROGRA~1\MICROS~3\VC98\Include;C:\PROGRA~1\MICROS~3\VC98\MFC\Include PATH=C:/CPANFL~1.12/var/libs/bin;C:\PROGRA~1\MICROS~2\Bin;C:\PROGRA~1\MICROS~2\Bin\WinNT;C:\PROGRA~1\MICROS~3\VC98\Bin;C:\PROGRA~1\MICROS~3\Common\MSDev98\Bin;C:\Perl-5.12\site\bin;C:\Perl-5.12\bin;C:\cygwin\bin;C:\PROGRA~1\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WINDOW~2\v1.0 Going to read 'C:\cpanfly-5.12\var\cpan\Metadata' Database was generated on Thu, 06 May 2010 21:27:13 GMT Running make for C/CH/CHROMATIC/Sub-Context-1.00.tar.gz Fetching with LWP: http://cpan.nas.activestate.com/authors/id/C/CH/CHROMATIC/Sub-Context-1.00.tar.gz Checksum for C:\cpanfly-5.12\var\cpan\sources\authors\id\C\CH\CHROMATIC\Sub-Context-1.00.tar.gz ok Sub-Context-1.00/ Sub-Context-1.00/lib/ Sub-Context-1.00/lib/Sub/ Sub-Context-1.00/lib/Sub/Context.pm Sub-Context-1.00/META.yml Sub-Context-1.00/Changes Sub-Context-1.00/t/ Sub-Context-1.00/t/pod-coverage.t Sub-Context-1.00/t/0-signature.t Sub-Context-1.00/t/pod.t Sub-Context-1.00/t/basic.t Sub-Context-1.00/t/subs.t Sub-Context-1.00/MANIFEST Sub-Context-1.00/Build.PL Sub-Context-1.00/Makefile.PL Sub-Context-1.00/README Sub-Context-1.00/SIGNATURE CPAN.pm: Going to build C/CH/CHROMATIC/Sub-Context-1.00.tar.gz >>> C:\Perl-5.12\bin\perl.exe Makefile.PL Checking if your kit is complete... Looks good Writing Makefile for Sub::Context >>> nmake Microsoft (R) Program Maintenance Utility Version 7.00.8882 Copyright (C) Microsoft Corp 1988-2000. All rights reserved. cp lib/Sub/Context.pm blib\lib\Sub\Context.pm CHROMATIC/Sub-Context-1.00.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. C:\Perl-5.12\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib\lib', 'blib\arch')" t/*.t # Next time around, consider install Module::Signature, # so you can verify the integrity of this distribution. t/0-signature.t ... 1..1 ok 1 # skip Module::Signature not installed ok t/basic.t ......... 1..18 ok 1 - use Sub::Context; ok 2 - main->can('foo') ok 3 - should detect and dispatch in void context ok 4 - should respect list context ok 5 - ... and should return correct order ok 6 - should detect and dispatch in scalar context ok 7 - NotMain->can('bar') ok 8 - import should only pollute calling package namespace ok 9 - should throw exception with unexpected context ok 10 - should not attempt to call a non-sub ok 11 - ... warning with custom message, if necessary ok 12 - not overwriting existing scalar ok 13 - ... hash ok 14 - ... or array ok 15 - ... nor original sub ok 16 - should wrap around existing sub for context ok 17 - should call passed subref ok 18 - import() should warn with bad type request ok t/pod-coverage.t .. 1..1 ok 1 - Pod coverage on Sub::Context ok t/pod.t ........... 1..1 ok 1 - POD test for blib\lib\Sub\Context.pm ok t/subs.t .......... 1..38 ok 1 - use Sub::Context; ok 2 - Sub::Context->can('_qualify_sub') ok 3 - _qualify_sub() should find sub in given package name, _qualifying it ok 4 - ... or should find sub given fully-qualified name ok 5 - ... even if sub does not exist ok 6 - Sub::Context->can('_find_glob') ok 7 - _find_glob() should find named glob ok 8 - ... even if it does not exist yet ok 9 - Sub::Context->can('_validate_contexts') ok 10 - _validate_contexts() should die given invalid context ok 11 - ... but should live otherwise ok 12 - Sub::Context->can('_fetch_glob') ok 13 - _fetch_glob() should not copy CODE slot ok 14 - ... but should copy other slots ok 15 - ... unmodified ok 16 - ... and should return new glob if it does not exist ok 17 - Sub::Context->can('_contexts') ok 18 - _contexts() should return available contexts ok 19 - Sub::Context->can('_generate_contexts') ok 20 - _generate_contexts() should add fallback contexts ok 21 - ... for the given contexts ok 22 - ... default throwing an exception, with no sub defined ok 23 - ... default throwing an exception, with no sub defined ok 24 - ... default throwing an exception, with no sub defined ok 25 - ... or setting fallback to defined sub ok 26 - ... pointing all unused contexts at wrapped subroutine if it exists ok 27 - ... but not overwriting existing wrap ok 28 - ... not allowing scalar references ok 29 - ... not allowing array references ok 30 - ... and not allowing hash references ok 31 - Sub::Context->can('_apply_contexts') ok 32 - _apply_contexts() should populate glob with a sub ok 33 - ... doing the right thing in void context ok 34 - ... in scalar context ok 35 - ... and in list context ok 36 - Sub::Context->can('_default_sub') ok 37 - _default_sub() should return named subref if it exists ok 38 - ... or a default croaking sub ok All tests successful. Files=5, Tests=59, 0 wallclock secs ( 0.08 usr + 0.00 sys = 0.08 CPU) Result: PASS CHROMATIC/Sub-Context-1.00.tar.gz nmake test TEST_VERBOSE=1 -- OK Fetching with LWP: http://cpan.nas.activestate.com/authors/id/C/CH/CHROMATIC/CHECKSUMS chromatic <chromatic@wgz.org> Perl extension to dispatch subroutines based on their calling context >>> (cd C:\cpanfly-5.12\var\cpan\build\Sub-Context-1.00-UAiwKl && tar cvf - Sub-Context-1.00.ppd blib) | gzip -c >C:/cpanfly-5.12/var/REPO/C/CH/CHROMATIC/Sub-Context-1.00.tar.gz Sub-Context-1.00.ppd blib/ blib/lib/ blib/lib/Sub/ blib/lib/Sub/Context.pm >>> mv C:\cpanfly-5.12\var\cpan\build\Sub-Context-1.00-UAiwKl/Sub-Context-1.00.ppd C:/cpanfly-5.12/var/REPO/C/CH/CHROMATIC Finished 2010-05-07T12:07:36