From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

PJACKLAM / Math-BigInt-2.005002 / xt / author / use_round_mode-mbi.t 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14

              
# -*- mode: perl; -*-
use strict;
use warnings;
use Test::More tests => 2;
use Math::BigInt round_mode => "odd";
is(Math::BigInt -> round_mode(), "odd",
   'Math::BigInt -> round_mode() is "odd"');
is(Math::BigInt -> config("round_mode"), "odd",
   'Math::BigInt -> config("round_mode") is "odd"');