summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
8ff19c0)
+{
+ # Silence the deprecation warnings from bigfloat.pl for the purpose
+ # of testing. These tests will be removed along with bigfloat.pl in
+ # the next major release of perl.
+ local $SIG{__WARN__} = sub {
+ if ($_[0] !~ /deprecated/) {
+ print(STDERR @_);
+ }
+ };
+ require "bigfloat.pl";
+}
chdir 't' if -d 't';
@INC = '../lib';
}
chdir 't' if -d 't';
@INC = '../lib';
}
+
+{
+ # Silence the deprecation warnings from bigint.pl for the purpose
+ # of testing. These tests will be removed along with bigint.pl in
+ # the next major release of perl.
+ local $SIG{__WARN__} = sub {
+ if ($_[0] !~ /deprecated/) {
+ print(STDERR @_);
+ }
+ };
+ require "bigint.pl";
+}