Hi,
Looks like primitive.t failure is simply the result of srand not behaving as 
expected.

Could you run this (and post the output):

perl -Mblib -MPDL::LiteF -MPDL::Types -le "srand 5; $r1=random 5;srand 5; 
$r2=random 5;print $r1;print $r2"

(Also, run the exact same command a second time and check that the output 
stays the same.)

That's pretty much all that tests 10 and 11 are doing, so I expect you'll 
find that $r1 and $r2 are different.

For me, that outputs:

[0.0016479492 0.87564087 0.37399292 0.74612427 0.84411621]
[0.0016479492 0.87564087 0.37399292 0.74612427 0.84411621]

The actual values aren't all that important and will probably vary from 
platform to platform, but  the 2 piddles ($r1 and $r2) should be the same.

The burning question is, of course, "Why are yours different?" (I don't have 
an answer.)

Cheers,
Rob 


_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl

Reply via email to