#!perl

use strict;
use warnings;

use Test::More tests => 66;

use bignum;

#require "t/infnan.inc";

# The 'bigint'/'bignum'/'bigrat' pragma is lexical, so we can't 'require' or
# 'do' the included file. Slurp the whole thing and 'eval' it.

my $file = "t/infnan.inc";

open FILE, $file or die "$file: can't open file for reading: $!";
my $data = do { local $/; <FILE> };
close FILE or die "$file: can't close file after reading: $!";

eval $data;
die $@ if $@;