cvs commit: parrot/t/dynclass foo.t

[Will Coleda]

cvsuser     05/04/07 20:38:49

  Modified:    t/dynclass foo.t
  Log:
  Not everyone has BigInt.
  
  Revision  Changes    Path
  1.3       +6 -1      parrot/t/dynclass/foo.t
  
  Index: foo.t
  ===================================================================
  RCS file: /cvs/public/parrot/t/dynclass/foo.t,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- foo.t     5 Apr 2005 11:36:49 -0000       1.2
  +++ foo.t     8 Apr 2005 03:38:49 -0000       1.3
  @@ -17,6 +17,7 @@
   =cut
   
   use Parrot::Test tests => 2;
  +use Parrot::Config;
   
   pir_output_is(<< 'CODE', << 'OUTPUT', "get_integer");
   
  @@ -33,6 +34,8 @@
   42
   OUTPUT
   
  +SKIP: { skip("No BigInt Lib configured", 1) if !$PConfig{gmp};
  +
   pir_output_is(<< 'CODE', << 'OUTPUT', "inherited add");
   .sub _main @MAIN
       .local pmc d, l, r
  @@ -55,3 +58,5 @@
   134217730
   BigInt
   OUTPUT
  +
  +}