[tapx-dev] --exec fails on Ubuntu (with more debugging info)

[Ovid]

As a follow up to Florian Ragwitz's bug report, I note --exec is failing for me, too:

  examples $ perl -v
  This is perl, v5.8.8 built for i486-linux-gnu-thread-multi
  examples $ uname -a
  Linux tomis 2.6.20-16-386 #2 Thu Jun 7 20:16:13 UTC 2007 i686 GNU/Linux

And a minimal failure:

    examples $ perl /usr/local/bin/runtests --exec ./my_exec t/ruby.t
    t/ruby......Undefined subroutine &main::puts called at t/ruby.t line 1.
    t/ruby...... Dubious, test returned 255 (wstat 65280, 0xff00)
     All 0 subtests passed 

    Test Summary Report
    -------------------
    t/ruby.t (Wstat: 65280 Tests: 0 Failed: 0)
      Non-zero exit status: 255
      Parse errors: No plan found in TAP output
    Files=1, Tests=0,  0 wallclock secs ( 0.00 cusr +  0.00 csys =  0.00 CPU)

In running through the debugger, I see this:

    710:        my $parser = TAP::Parser->new( $self->_get_parser_args($test) );
     DB<6> x $self->_get_parser_args($test)
    0  HASH(0x84e809c)
       'merge' => undef
       'source' => 't/ruby.t'
       'spool' => undef
       'switches' => ARRAY(0x84e80d8)
            empty array

Isn't that supposed to return an 'exec' argument instead of a source?  I don't have a known working copy to test this with.

At this point in the program, $self is as follows:

       DB<7> x $self
    0  TAP::Harness::Color=HASH(0x8991dd4)
       '_longest' => 8
       'exec' => ARRAY(0x89718b0)
          0  './my_exec'
       'lib' => ARRAY(0x89afd48)
            empty array
       'ok_callbacks' => HASH(0x857b070)
          'made_parser' => 1
       'quiet' => 0
       'really_quiet' => 0
       'switches' => ARRAY(0x89c91b8)
            empty array

Regrettably, I don't have more time to look into this as I'm at work.  However, this is a major bug.

Cheers,
Ovid
 
--
Buy the book  - http://www.oreilly.com/catalog/perlhks/
Perl and CGI  - http://users.easystreet.com/ovid/cgi_course/
Personal blog - http://publius-ovidius.livejournal.com/
Tech blog     - http://use.perl.org/~Ovid/journal/