Documented changes.
Last tweak to test case.
p4raw-id: //depot/perl@17113
=head1 VERSION
-This document describes version 0.76 of Attribute::Handlers,
-released November 15, 2001.
+This document describes version 0.77 of Attribute::Handlers,
+released June 8, 2002.
=head1 SYNOPSIS
- Added $VERSION numbrs to demo modules (seems bizarre to me, but
they're core too now).
+
+
+0.77 Sat Jun 8 22:58:56 CEST 2002
+
+ - Since Attribute::Handlers now is core, I will refer to changes
+ with their patch number, please read Porting/repository.pod from
+ your a perl tarball for more information.
+
+ - Brought up to date with perl 5.8RC1 version
+ will be 5.8 if no more changes come in
+
+ - [#13686] This changes the behaviour of lexical attributes.
+ Prior to this lexical attributes were done at a compile time,
+ and they would loose their attribute on the next run over them.
+ Now perl 5.8 calls the attribute handler runtime whenever it hits my.
+
+ - [#14448] Fixes cases with too high refcounts on lexical attributes
+
+ - [#15945] Do not warn about too late CHECK and INIT block if
+ A::H is pulled in using a require.
+
==============================================================================
- Release of version 0.76 of Attribute::Handlers
+ Release of version 0.77 of Attribute::Handlers
==============================================================================
==============================================================================
-CHANGES IN VERSION 0.76
+0.77 Sat Jun 8 22:58:56 CEST 2002
+ - Since Attribute::Handlers now is core, I will refer to changes
+ with their patch number, please read Porting/repository.pod from
+ your a perl tarball for more information.
- - Fixed documentation nit (thanks Rick)
+ - Brought up to date with perl 5.8RC1 version
+ will be 5.8 if no more changes come in
- - Improving intuitiveness of autotie mechanism (thanks Marcel)
+ - [#13686] This changes the behaviour of lexical attributes.
+ Prior to this lexical attributes were done at a compile time,
+ and they would loose their attribute on the next run over them.
+ Now perl 5.8 calls the attribute handler runtime whenever it hits my.
- - Added $VERSION numbrs to demo modules (seems bizarre to me, but
- they're core too now).
+ - [#14448] Fixes cases with too high refcounts on lexical attributes
+
+ - [#15945] Do not warn about too late CHECK and INIT block if
+ A::H is pulled in using a require.
==============================================================================
# (correspondingly "not ok 13") depending on the success of chunk 13
# of the test code):
-sub ok { $::count++; push @::results, [$_[1], $_[0]?"":"not "]; }
+sub ok { $::count++; push @::results, [$_[1], $_[0]?"":"not ", defined($_[2])?$_[2]:""]; }
END { print "1..$::count\n";
- print map "$_->[1]ok $_->[0]\n",
+ print map "$_->[1]ok $_->[0] $_->[2]\n",
sort {$a->[0]<=>$b->[0]}
grep $_->[0], @::results }
ok( $out eq "begin\nbye\n", 45 );
{ my $dummy : Dummy; $dummy = bless {}, 'Dummy'; }
-ok( $out eq "begin\nbye\nbye\n", 46 );
-
+if($] < 5.008) {
+ok( 1, 46, " # skip lexicals are not runtime prior to 5.8");
+} else {
+ok( $out eq "begin\nbye\nbye\n", 46);
+}
# are lexical attributes reapplied correctly?
sub dummy { my $dummy : Dummy; }
$applied = 0;
dummy(); dummy();
if($] < 5.008) {
-ok(1, "47 # skip does not work with perl prior to 5.8");
+ok(1, 47, " # skip does not work with perl prior to 5.8");
} else {
ok( $applied == 2, 47 );
}
};
my $match = $@ =~ /^Won't be able to apply END handler/;
if($] < 5.008) {
-ok(1,"52 # Skip, no difference between lexical handlers and normal handlers prior to 5.8");
+ok(1,52 ,"# Skip, no difference between lexical handlers and normal handlers prior to 5.8");
} else {
ok( $match, 52 );
}