📄 bninfnan.t
字号:
#!/usr/bin/perl -w###############################################################################use Test;use strict;BEGIN { $| = 1; my $location = $0; $location =~ s/bninfnan.t//i; if ($ENV{PERL_CORE}) { @INC = qw(../lib ../lib/bignum/t); # testing with the core distribution } else { unshift @INC, '../lib'; # for testing manually } if (-d 't') { chdir 't'; require File::Spec; unshift @INC, File::Spec->catdir(File::Spec->updir, $location); } else { unshift @INC, $location; } print "# INC = @INC\n"; plan tests => 26; }use bignum;my ($x);require "infnan.inc";
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -