[svn:parrot] r49083 - trunk/t/dynpmc

[fperrad at svn.parrot.org]

Author: fperrad
Date: Fri Sep 17 14:00:48 2010
New Revision: 49083
URL: https://trac.parrot.org/parrot/changeset/49083

Log:
[t] refactor with skip_all

Modified:
   trunk/t/dynpmc/rational.t

Modified: trunk/t/dynpmc/rational.t
==============================================================================
--- trunk/t/dynpmc/rational.t	Fri Sep 17 13:39:17 2010	(r49082)
+++ trunk/t/dynpmc/rational.t	Fri Sep 17 14:00:48 2010	(r49083)
@@ -27,16 +27,6 @@
 
     unless $S0 goto no_gmp
     plan(56)
-    goto gmp_tests
-
-  no_gmp:
-    # seems like plan(0) is not supported currently
-    plan(1)
-    ok(1,'GMP not found, skipping Rational tests')
-    .return()
-
-    # The following tests only run if GMP is installed
- gmp_tests:
     loadlib $P1, 'rational'
     test_init()
     test_version()
@@ -77,6 +67,11 @@
     test_abs()
     test_cmp()
     test_equal_tt1517()
+    .return()
+
+ no_gmp:
+    skip_all('GMP not found, skipping Rational tests')
+    .return()
 .end
 
 .sub test_neg