~ubuntu-branches/ubuntu/precise/libdata-entropy-perl/precise

« back to all changes in this revision

Viewing changes to t/rand.t

  • Committer: Bazaar Package Importer
  • Author(s): Jotam Jr. Trejo
  • Date: 2011-05-08 16:44:11 UTC
  • mfrom: (1.1.4 upstream)
  • Revision ID: james.westby@ubuntu.com-20110508164411-te8qgrv79zsowhwa
Tags: 0.007-1
* New upstream release
* debian/rules: refresh, use tiny dh7 now
* debian/copyright: refresh according to DEP 5 revision 135, also
  update Ivan Kohler email
* debian/control: drop useless versioned perl dependency
* Switch to source format 3.0 (quilt)
* debian/control: bump Standards Version to 3.9.2
* debian/control: add libtest-pod-perl, libtest-pod-coverage-perl and
  libhttp-lite-perl to B-D-I, needed by some tests
* debian/control: remove libwww-perl from dependencies, upstream use
  HTTP::Lite instead of LWP now
* Add myself to Uploaders and Copyright
* Bump DH compat level to 8

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
use warnings;
 
2
use strict;
 
3
 
1
4
use Test::More tests => 261;
2
5
 
3
6
use Data::Float 0.008 qw(significand_bits);
9
12
        use_ok "Data::Entropy::Algorithms", qw(rand);
10
13
}
11
14
 
12
 
$skip_all = significand_bits < 47;
 
15
my $skip_all = significand_bits < 47;
13
16
 
14
17
with_entropy_source +Data::Entropy::Source->new(
15
18
                IO::File->new("t/test0.entropy", "r") || die($!), "getc"
26
29
                is sprintf("%.5f", rand), "0.40339";
27
30
                is sprintf("%.5f", rand(0)), "0.57643";
28
31
        }
29
 
}
 
32
};
 
33
 
 
34
1;
30
35
 
31
36
__DATA__
32
37
4.03949