Select Code to Download

Select or download this

[root@rouzic]:/usr/src/Math-Pari-2.001804# PERL_DL_NONLAZY=1 /usr/bin/
+perl -Iblib/arch -Iblib/lib -I/usr/local/lib/perl5/5.6.1/i686-linux -
+I/usr/local/lib/perl5/5.6.1 -e 'use Test::Harness qw(&runtests $verbo
+se); $verbose=0; runtests @ARGV;' t/analyz.t
t/analyz............Variable in perl2pari is not of known type at test
+_eng/Testout.pm line 8.
        ...propagated at t/analyz.t line 5.
t/analyz............dubious
        Test returned status 255 (wstat 65280, 0xff00)
FAILED--1 test script could be run, alas--no output ever seen

Select or download this

  $file = __FILE__;
  $file =~ m|([^/.]*)\.t$| or die;
  @ARGV = "pari-2.1.1/src/test/32/$1";
  do 'test_eng/Testout.pm';
  die if $@;

Select or download this

     1  #! perl
     2  #       $rcs = ' $Id: testout.t,v 1.2 1997/09/22 10:13:37 ilya
+ Exp ilya $ ' ;
     3
...
    13    close TO or die "close: $!";
    14  }
    [...]

Select or download this

  $cmd = '/usr/bin/perl -w t/analyz.t|'
  my $fh = new FileHandle;
  $fh->open($cmd) or print "can't run $test. $!\n";

Select or download this

  Too few args 0 for PARI function shift at test_eng/Testout.
        ...propagated at t/analyz.t line 5.