In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/a5fbf48bd5216bedef9a11ecfaaa6efccfd64e2c?hp=8182a17b47917dbffdc30aa3e9cf29249c8127ed>
- Log ----------------------------------------------------------------- commit a5fbf48bd5216bedef9a11ecfaaa6efccfd64e2c Author: James E Keenan <[email protected]> Date: Thu Nov 17 18:01:13 2016 -0500 Remove code commented out since July 1996. ----------------------------------------------------------------------- Summary of changes: dist/Safe/t/safe2.t | 12 ------------ 1 file changed, 12 deletions(-) diff --git a/dist/Safe/t/safe2.t b/dist/Safe/t/safe2.t index b55b4a9..fc519ff 100644 --- a/dist/Safe/t/safe2.t +++ b/dist/Safe/t/safe2.t @@ -143,16 +143,4 @@ if ($@) { } close(NOSUCH); -#my $rdo_file = "tmp_rdo.tpl"; -#if (open X,">$rdo_file") { -# print X "999\n"; -# close X; -# $cpt->permit_only('const', 'leaveeval'); -# $cpt->rdo($rdo_file) == 999 ? "ok $t\n" : "not ok $t\n"; $t++; -# unlink $rdo_file; -#} -#else { -# print "# test $t skipped, can't open file: $!\nok $t\n"; $t++; -#} - done_testing(); -- Perl5 Master Repository
