File: powmod_with_scale.phpt

package info (click to toggle)
php8.4 8.4.11-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 208,108 kB
  • sloc: ansic: 1,060,628; php: 35,345; sh: 11,866; cpp: 7,201; pascal: 4,913; javascript: 3,091; asm: 2,810; yacc: 2,411; makefile: 689; xml: 446; python: 301; awk: 148
file content (45 lines) | stat: -rw-r--r-- 1,030 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
--TEST--
BcMath\Number powmod() with scale
--EXTENSIONS--
bcmath
--FILE--
<?php

$scales = [0, 10];

$values = ['12', '-12'];

$exponents = [
    [2, 'int'],
    ['0', 'string'],
    ['3', 'string'],
    [new BcMath\Number('2'), 'object'],
    [new BcMath\Number('0'), 'object'],
];

$mods = [
    [2, 'int'],
    ['3', 'string'],
    [new BcMath\Number('2'), 'object'],
];

foreach ($scales as $scale) {
    foreach ($values as $value) {
        $num = new BcMath\Number($value);

        foreach ($exponents as [$exponent, $type_ex]) {
            foreach ($mods as [$mod, $type_mod]) {
                $func_ret = bcpowmod($value, (string) $exponent, (string) $mod, $scale);
                $method_ret = $num->powmod($exponent, $mod, $scale);
                if ($method_ret->compare($func_ret) !== 0) {
                    echo "Result is incorrect.\n";
                    var_dump($value, $exponent, $mod, $scale, $func_ret, $method_ret);
                }
            }
        }
    }
}
echo 'done!';
?>
--EXPECT--
done!