From dde38e073e9781ba5c1fb18106a9ea10d04a97f9 Mon Sep 17 00:00:00 2001
From: moritz <moritz@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Wed, 25 Jun 2008 21:53:00 +0000
Subject: [PATCH] [spec] rand.t: unfudged one test, changed fudge message of
 other

git-svn-id: http://svn.pugscode.org/pugs@21043 c213334d-75ef-0310-aa23-eaa082d1ae64
---
 S29-num/rand.t | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/S29-num/rand.t b/S29-num/rand.t
index 29d1419c77..5e7cacd3b6 100644
--- a/S29-num/rand.t
+++ b/S29-num/rand.t
@@ -17,10 +17,9 @@ ok(rand() < 1, 'rand() returns numbers less than 1');
 
 # L<S29/Num/"=item srand">
 
-#?rakudo skip 'no sub srand()'
-ok(srand(1), 'srand(1) parses');
+lives_ok { srand(1) }, 'srand(1) lives and parses';
 
-#?rakudo skip 'no sub srand()'
+#?rakudo skip 'dubious errors'
 {
     sub repeat_rand ($seed) {
 	    srand($seed);