NAME

Object::GMP - Moo Role for any object has GMP field

USAGE

This module is a moo role

Example

package Foo;
use Moo;
with "Object::GMP";
has a     => ( is => 'ro' );
has b     => ( is => 'ro' );
has prime => ( is => 'rw' );
around BUILDARGS => __PACKAGE__->BUILDARGS_val2gmp('prime');
1;

The above exmaple to declare the field 'prime' is a GMP value.

my $prime =
 '0xFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFC2F';
my $foo = Foo->new( a => 0, b => 7, prime => $prime );
isnt( ref( $foo->a ), undef, 'a is not gmp' );
isnt( ref( $foo->b ), undef, 'b is not gmp' );
isa_ok( $foo->prime, 'Math::BigInt', 'prime is gmp' );

So when you create an object, a and b will be normal value and prime will be a GMP value.

LINKS

Git Repo: https://github.com/mvu8912/perl5-object-gmp.git

CPAN Module: https://metacpan.org/pod/Object::GMP