Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Comment on

( #3333=superdoc: print w/ replies, xml ) Need Help??
This is more or less a shot in the dark, but the Monastery has always been my 'goto place' (bad pun, bad, bad!) What I have is the following; if I run dmake test I get:
C:\>perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', ' +blib/arch')" t/*.t t/01_epdcode.t ...... ok t/02_Storable.t ..... ok t/03_epdlist.t ...... ok t/04_epdstr.t ....... ok t/05_list-str.t ..... ok t/06_epdgetboard.t .. ok t/07_psquares.t ..... ok t/08_epdset.t ....... ok All tests successful. Files=8, Tests=33, 2 wallclock secs ( 0.09 usr + 0.03 sys = 0.13 CP +U) Result: PASS
While the tester for PAUSE gets:
Output from '/usr/bin/make test': PERL_DL_NONLAZY=1 /home/sts/cpansmoke/perl-5.12.3/bin/perl "-MExtUtils +::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t # No tests run! t/01_epdcode.t ...... Dubious, test returned 255 (wstat 65280, 0xff00) Failed 7/7 subtests t/02_Storable.t ..... ok t/03_epdlist.t ...... No subtests run t/04_epdstr.t ....... No subtests run t/05_list-str.t ..... No subtests run t/06_epdgetboard.t .. No subtests run t/07_psquares.t ..... No subtests run t/08_epdset.t ....... No subtests run Test Summary Report ------------------- t/01_epdcode.t (Wstat: 65280 Tests: 0 Failed: 0) Non-zero exit status: 255 Parse errors: Bad plan. You planned 7 tests but ran 0. t/03_epdlist.t (Wstat: 0 Tests: 0 Failed: 0) Parse errors: No plan found in TAP output t/04_epdstr.t (Wstat: 0 Tests: 0 Failed: 0) Parse errors: No plan found in TAP output t/05_list-str.t (Wstat: 0 Tests: 0 Failed: 0) Parse errors: No plan found in TAP output t/06_epdgetboard.t (Wstat: 0 Tests: 0 Failed: 0) Parse errors: No plan found in TAP output t/07_psquares.t (Wstat: 0 Tests: 0 Failed: 0) Parse errors: No plan found in TAP output t/08_epdset.t (Wstat: 0 Tests: 0 Failed: 0) Parse errors: No plan found in TAP output Files=8, Tests=3, 3 wallclock secs ( 0.12 usr 0.04 sys + 2.32 cusr + 0.21 csys = 2.69 CPU) Result: FAIL Failed 7/8 test programs. 0/3 subtests failed. *** Error code 255 Stop in /home/sts/cpansmoke/perl-5.12.3/cpan/build/Chess-PGN-EPD-0.25- +YJnWEi (line 781 of Makefile).
His report on machine and environment shows nothing that I can see that should make a difference. That said, he is testing under MirOS BSD while I'm running Windows Vista, likewise he is testing using perl 5.12.3 while I am using perl 5.10.1. I don't mind that I'm getting fails, I do mind that I've no useful information to go on. Just staring at the ashes, all I can see is that something is preventing all of the subtests from running excepting t/02_Storable.t. I look at the
t/01_epdcode.t (Wstat: 65280 Tests: 0 Failed: 0) Non-zero exit status: 255 Parse errors: Bad plan. You planned 7 tests but ran 0.
Here is the offending code:
#!/usr/bin/perl # 01_epdcode.t -- test epdcode. use Test::More tests => 7; use Chess::PGN::EPD qw( epdlist epdcode ); ok(1); # 1. If we made it this far, we're ok. my @epd1; my @epd2; my @moves1 = qw( e4 e6 f4 d5 e5 c5 Nf3 Nc6 d3 Be7 Be2 Nh6 c3 O-O O-O f6 exf6 Bxf6 d4 cxd4 cxd4 Qb6 Nc3 Bxd4+ Kh1 Bxc3 bxc3 Ng4 Nd4 Nxd4 cxd4 Nf6 Ba3 Rf7 Rb1 Qd8 Bd3 Bd7 Qf3 Bc6 f5 Ne4 Bxe4 dxe4 Qd1 exf5 Rb2 Qd5 Rbf2 e3 Re2 Bb5 ); my @moves2 = qw( d4 Nf6 c4 e6 Nc3 Bb4 e3 b6 Ne2 Bb7 a3 Be7 f3 d5 cxd5 exd5 Ng3 O-O Bd3 +c5 O-O Re8 Nf5 Bf8 g4 g6 Ng3 Nc6 g5 cxd4 exd4 Nd7 Nge2 Bg7 Nb5 Nf8 f4 a6 +f5 axb5 f6 Bh8 Bxb5 Ba6 Bxa6 Rxa6 Bf4 Qd7 Rc1 Raa8 Rc3 Re4 Ng3 Rxd4 Qc2 N +a5 Be3 Rg4 Qd1 Nc4 Bc1 b5 Rd3 d4 Re1 h5 b3 Nb6 Re7 Qd6 Re4 Rxe4 Nxe4 Qc6 +Nd2 Ne6 Nf3 Rd8 Be3 Qe4 ); @epd1 = reverse epdlist( @moves1 ); @epd2 = reverse epdlist( @moves2 ); is(ECO(\@epd1),'C00','ECO lookup #1'); # 2. is(NIC(\@epd1),'FR 1','NIC lookup #1'); # 3. is(Opening(\@epd1),'French: Labourdonnais variation','Opening lookup # +1'); # 4. is(ECO(\@epd2),'E44','ECO lookup #2'); # 5. is(NIC(\@epd2),'NI 13','NIC lookup #2'); # 6. is(Opening(\@epd2),'Nimzo-Indian: Fischer variation, 5.Ne2'); # 7. sub ECO { my $movesref = shift; return epdcode('ECO',$movesref); } sub NIC { my $movesref = shift; return epdcode('NIC',$movesref); } sub Opening { my $movesref = shift; return epdcode('Opening',$movesref); }
I am (as usual) probably missing something obvious here, but whatever it is, I can't see it. So would someone with out the mote in the eye problem, tell me what I'm missing? I'd particularly like to know since I need to extend the testing to cover code I've added since I made the change to .25!

--hsm

"Never try to teach a pig to sing...it wastes your time and it annoys the pig."

In reply to PAUSE problem by hsmyers

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • Outside of code tags, you may need to use entities for some characters:
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Chatterbox?
    and the web crawler heard nothing...

    How do I use this? | Other CB clients
    Other Users?
    Others pondering the Monastery: (7)
    As of 2014-09-17 05:16 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      How do you remember the number of days in each month?











      Results (57 votes), past polls