1*256a93a4Safresh1# -*- mode: perl; -*- 2*256a93a4Safresh1 3*256a93a4Safresh1use strict; 4*256a93a4Safresh1use warnings; 5*256a93a4Safresh1 6*256a93a4Safresh1use Test::More; 7*256a93a4Safresh1 8*256a93a4Safresh1BEGIN { 9*256a93a4Safresh1 eval { require Math::BigInt::GMP; }; 10*256a93a4Safresh1 if ($@) { 11*256a93a4Safresh1 plan skip_all => "Math::BigInt::GMP not installed"; 12*256a93a4Safresh1 } else { 13*256a93a4Safresh1 plan tests => "1"; 14*256a93a4Safresh1 } 15*256a93a4Safresh1} 16*256a93a4Safresh1 17*256a93a4Safresh1use bigfloat only => "GMP"; 18*256a93a4Safresh1 19*256a93a4Safresh1my $x = 1; 20*256a93a4Safresh1is($x -> config("lib"), "Math::BigInt::GMP", 21*256a93a4Safresh1 "backend is Math::BigInt::GMP"); 22