Home | History | Annotate | Download | only in perl

Lines Matching defs:via_printf

2049 sub via_printf {
2088 ok (via_printf ("%d", mpz(123)) eq '123');
2089 ok (via_printf ("%d %d %d", 456, mpz(123), 789) eq '456 123 789');
2090 ok (via_printf ("%d", mpq(15,16)) eq '15/16');
2091 ok (via_printf ("%f", mpf(1.5)) eq '1.500000');
2092 ok (via_printf ("%.2f", mpf(1.5)) eq '1.50');
2094 ok (via_printf ("%*d", 6, 123) eq '   123');
2095 ok (via_printf ("%*d", 6, mpz(123))  eq '   123');
2096 ok (via_printf ("%*d", 6, mpq(15,16))  eq ' 15/16');
2098 ok (via_printf ("%x", 123) eq '7b');
2099 ok (via_printf ("%x", mpz(123))  eq '7b');
2100 ok (via_printf ("%X", 123) eq '7B');
2101 ok (via_printf ("%X", mpz(123))  eq '7B');
2102 ok (via_printf ("%#x", 123) eq '0x7b');
2103 ok (via_printf ("%#x", mpz(123))  eq '0x7b');
2104 ok (via_printf ("%#X", 123) eq '0X7B');
2105 ok (via_printf ("%#X", mpz(123))  eq '0X7B');
2107 ok (via_printf ("%x", mpq(15,16))  eq 'f/10');
2108 ok (via_printf ("%X", mpq(15,16))  eq 'F/10');
2109 ok (via_printf ("%#x", mpq(15,16))  eq '0xf/0x10');
2110 ok (via_printf ("%#X", mpq(15,16))  eq '0XF/0X10');
2112 ok (via_printf ("%*.*f", 10, 3, 1.25) eq '     1.250');
2113 ok (via_printf ("%*.*f", 10, 3, mpf(1.5))   eq '     1.500');