Group
Extension

Matches 44

Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_ssub.t ( view source; MetaCPAN )

        is($got[1], $out1,
           "'$test' second output arg has the right value");

        isnt(refaddr($got[0]), refaddr($y),
             "'$test' output arg is not the third input arg");

  

        is($got[1], $out1,
           "'$test' second output arg has the right value");

        isnt(refaddr($got[0]), refaddr($x),
             "'$test' output arg is not the first input arg");

  
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/new-mbr.t ( view source; MetaCPAN )
    "The value of the denominator hasn't changed");

isnt(refaddr($n), refaddr($n_orig),
     "The addresses of the numerators have changed");
isnt(refaddr($d), refaddr($d_orig),
     "The addresses o
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_lcm.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_add.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_mod.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-ternary-_rsft.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_root.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_pow.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-property-_alen.t ( view source; MetaCPAN )
 arg");

        is(ref($got[0]), "",
           "'$test' output arg is a Perl scalar");

        isnt($got[0], undef,
             "'$test' output arg is defined");

        like($got[0], qr/^[+-]?(\
ests => 4,

        is(ref($got), "",
           "'$test' output arg is a Perl scalar");

        isnt($got, undef,
             "'$test' output arg is defined");

        like($got, qr/^[+-]?(\d+(\.\
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-ternary-_lsft.t ( view source; MetaCPAN )
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got[0]), refaddr($y),
                 "'$test' output arg is not the second input arg")
    SKIP: {
            skip "Scalar::Util not available", 1 unless $scalar_util_ok;

            isnt(refaddr($got), refaddr($y),
                 "'$test' output arg is not the second input arg");
 
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/t/config.t ( view source; MetaCPAN )
r classes.

        for my $other (@classes) {
            next if $other eq $class;

            isnt($other->config($key), $class->config($key),
                 qq|$other->config("$key") isn't affe
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/new-mbf.t ( view source; MetaCPAN )
eys = ('_m', '_e');
        plan tests => scalar @keys;
        for my $key (@keys) {
            isnt(refaddr($y -> {$key}), refaddr($x -> {$key}),
                 'library thingy is a copy');
     
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/as_int-mbf.t ( view source; MetaCPAN )

    is(ref($y), 'Math::BigInt', '$y is a Math::BigInt');
    cmp_ok($y, "==", 2, '$y == 2');
    isnt(refaddr($x), refaddr($y), '$x and $y are different objects');
};

note("as_int() returns a Math::
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-arithmetic-binary-_modinv.t ( view source; MetaCPAN )
: {
                skip "Scalar::Util not available", 1 unless $scalar_util_ok;

                isnt(refaddr($got[0]), refaddr($m),
                     "'$test' first output arg is not the second i
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/as_int-mbr.t ( view source; MetaCPAN )

    is(ref($y), 'Math::BigInt', '$y is a Math::BigInt');
    cmp_ok($y, "==", 2, '$y == 2');
    isnt(refaddr($x), refaddr($y), '$x and $y are different objects');
};

note("as_int() returns a Math::
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/as_number-mbi.t ( view source; MetaCPAN )
Math::BigInt');
    is(ref($y), 'Math::BigInt', '$y is a Math::BigInt');
    cmp_ok($y, "==", 2, '$y == 2');
    isnt(refaddr($x), refaddr($y), '$x and $y are different objects');
};

done_testing();
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-bitwise-_sor.t ( view source; MetaCPAN )
value");

  SKIP: {
        skip "Scalar::Util not available", 1 unless $scalar_util_ok;

        isnt(refaddr($got[0]), refaddr($y),
             "'$test' first output arg is not the third input arg"
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-bitwise-_sand.t ( view source; MetaCPAN )
value");

  SKIP: {
        skip "Scalar::Util not available", 1 unless $scalar_util_ok;

        isnt(refaddr($got[0]), refaddr($y),
             "'$test' first output arg is not the third input arg"
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/lib-bitwise-_sxor.t ( view source; MetaCPAN )
value");

  SKIP: {
        skip "Scalar::Util not available", 1 unless $scalar_util_ok;

        isnt(refaddr($got[0]), refaddr($y),
             "'$test' first output arg is not the third input arg"
Math-BigInt ( P/PJ/PJACKLAM/Math-BigInt-2.003002.tar.gz, PJACKLAM, 2024; MetaCPAN )
Math-BigInt/xt/author/as_number-mbr.t ( view source; MetaCPAN )
Math::BigRat');
    is(ref($y), 'Math::BigInt', '$y is a Math::BigInt');
    cmp_ok($y, "==", 2, '$y == 2');
    isnt(refaddr($x), refaddr($y), '$x and $y are different objects');
};

done_testing();

Powered by Groonga
Maintained by Kenichi Ishigaki <ishigaki@cpan.org>. If you find anything, submit it on GitHub.