diff options
author | Karl Berry <karl@freefriends.org> | 2019-03-10 21:56:14 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-03-10 21:56:14 +0000 |
commit | e0a2a718e89f9700d627f1e6a8eea8f21d2fbeb8 (patch) | |
tree | 39972f65008b0d70f306a5f976494d29411bc41e /Master/tlpkg/tlperl/lib/attributes.pm | |
parent | b206fdc77d81ed1600949062f08de5690a4bf66f (diff) |
tl19 perl 5.28.1 for Windows, from Siep
git-svn-id: svn://tug.org/texlive/trunk@50322 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlperl/lib/attributes.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/attributes.pm | 23 |
1 files changed, 4 insertions, 19 deletions
diff --git a/Master/tlpkg/tlperl/lib/attributes.pm b/Master/tlpkg/tlperl/lib/attributes.pm index 7eb8e30ed88..c60f9406b99 100644 --- a/Master/tlpkg/tlperl/lib/attributes.pm +++ b/Master/tlpkg/tlperl/lib/attributes.pm @@ -1,6 +1,6 @@ package attributes; -our $VERSION = 0.29; +our $VERSION = 0.33; @EXPORT_OK = qw(get reftype); @EXPORT = (); @@ -18,10 +18,9 @@ sub carp { goto &Carp::carp; } +# Hash of SV type (CODE, SCALAR, etc.) to regex matching deprecated +# attributes for that type. my %deprecated; -$deprecated{CODE} = qr/\A-?(locked)\z/; -$deprecated{ARRAY} = $deprecated{HASH} = $deprecated{SCALAR} - = qr/\A-?(unique)\z/; my %msg = ( lvalue => 'lvalue attribute applied to already-defined subroutine', @@ -31,7 +30,7 @@ my %msg = ( sub _modify_attrs_and_deprecate { my $svtype = shift; - # Now that we've removed handling of locked from the XS code, we need to + # After we've removed a deprecated attribute from the XS code, we need to # remove it here, else it ends up in @badattrs. (If we do the deprecation in # XS, we can't control the warning based on *our* caller's lexical settings, # and the warned line is in this package) @@ -256,12 +255,6 @@ C<sub foo($$) : prototype(@) {}> is indistinguishable from C<sub foo(@){}>. If illegalproto warnings are enabled, the prototype declared inside this attribute will be sanity checked at compile time. -=item locked - -The "locked" attribute is deprecated, and has no effect in 5.10.0 and later. -It was used as part of the now-removed "Perl 5.005 threads". It will -disappear in Perl 5.28, after which its use will be fatal. - =item const This experimental attribute, introduced in Perl 5.22, only applies to @@ -280,14 +273,6 @@ The following are the built-in attributes for variables: Indicates that the referenced variable can be shared across different threads when used in conjunction with the L<threads> and L<threads::shared> modules. -=item unique - -The "unique" attribute is deprecated, and has no effect in 5.10.0 and later. -It used to indicate that a single copy of an C<our> variable was to be used by -all interpreters should the program happen to be running in a -multi-interpreter environment. It will disappear in 5.28, after which its -use will be fatal. - =back =head2 Available Subroutines |