On Thu, May 09, 2002 at 07:10:15PM -0700, chromatic wrote:
> Just when you thought it was safe to smoke Perl... I'm also working on tests
> for CPAN::FirstTime, though they may require a bit of reorganization to do
> it right.  It'll likely make the code smaller and more flexible too.
> 
> -- c
> 
> --- MANIFEST~ Thu May  9 19:04:21 2002
> +++ MANIFEST  Thu May  9 19:06:06 2002
> @@ -88,6 +88,7 @@
>  ext/B/Makefile.PL    Compiler backend makefile writer
>  ext/B/NOTES          Compiler backend notes
>  ext/B/O.pm           Compiler front-end module (-MO=...)
> +ext/B/t/o.t          See if O works
>  ext/B/ramblings/cc.notes     Compiler ramblings: notes on CC backend
>  ext/B/ramblings/curcop.runtime       Compiler ramblings: notes on curcop use
>  ext/B/ramblings/flip-flop    Compiler ramblings: notes on flip-flop
> --- /dev/null Thu Aug 30 02:54:37 2001
> +++ ext/B/t/o.t       Thu May  9 19:03:25 2002
> @@ -0,0 +1,59 @@
> +#!./perl -w
> +
> +use strict;
> +
> +BEGIN {
> +     chdir 't' if -d 't';
> +     @INC = ('../lib', 'lib', '.');
> +     require 'test.pl';
> +}
> +
> +local *OUT;
> +open(OUT, '>lib/B/success.pm') or skip_all( 'Cannot write fake backend module');

Unportable filename.

> +@lines = split(/\n/, runperl( args => \@args, stderr => 1 ) );

Portable to split on /\n/?

-- 
$jhi++; # http://www.iki.fi/jhi/
        # There is this special biologist word we use for 'stable'.
        # It is 'dead'. -- Jack Cohen

Reply via email to