summaryrefslogtreecommitdiff
path: root/t/lib/warnings/gv
diff options
context:
space:
mode:
authorAbigail <abigail@abigail.be>2017-06-06 23:16:30 +0200
committerAbigail <abigail@abigail.be>2017-06-06 23:17:22 +0200
commit64278e8ca74bf6743c65ced4c5002cdb054b2357 (patch)
tree6f7bf6a20e43dd16080275aeb5502d7ee209c81e /t/lib/warnings/gv
parentbb4830e68bcd02036b9e04bea8476c8f4583e3ba (diff)
downloadperl-64278e8ca74bf6743c65ced4c5002cdb054b2357.tar.gz
Fatalize inheriting AUTOLOAD for non-methods.
This was deprecated in 5.004.
Diffstat (limited to 't/lib/warnings/gv')
-rw-r--r--t/lib/warnings/gv25
1 files changed, 0 insertions, 25 deletions
diff --git a/t/lib/warnings/gv b/t/lib/warnings/gv
index c8e2b89acd..c053d7d45d 100644
--- a/t/lib/warnings/gv
+++ b/t/lib/warnings/gv
@@ -3,11 +3,6 @@
Can't locate package %s for @%s::ISA
@ISA = qw(Fred); joe()
- Use of inherited AUTOLOAD for non-method %s::%.*s() is deprecated
- sub Other::AUTOLOAD { 1 } sub Other::fred {}
- @ISA = qw(Other) ;
- fred() ;
-
$# is no longer supported
$* is no longer supported
@@ -39,26 +34,6 @@ EXPECT
Undefined subroutine &main::joe called at - line 3.
########
# gv.c
-sub Other::AUTOLOAD { 1 } sub Other::fred {}
-@ISA = qw(Other) ;
-use warnings 'deprecated' ;
-fred() ;
-my $x = \&barney;
-(bless[])->barney;
-EXPECT
-Use of inherited AUTOLOAD for non-method main::fred() is deprecated. This will be fatal in Perl 5.28 at - line 5.
-########
-# gv.c
-use utf8;
-use open qw( :utf8 :std );
-sub Oᕞʀ::AUTOLOAD { 1 } sub Oᕞʀ::fᕃƌ {}
-@ISA = qw(Oᕞʀ) ;
-use warnings 'deprecated' ;
-fᕃƌ() ;
-EXPECT
-Use of inherited AUTOLOAD for non-method main::fᕃƌ() is deprecated. This will be fatal in Perl 5.28 at - line 7.
-########
-# gv.c
$a = ${"#"};
$a = ${"*"};
no warnings 'deprecated' ;