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 -#?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);