projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
fdd52a6
)
overload.t: Translate a comment into English :-)
author
Father Chrysostomos
<sprout@cpan.org>
Sat, 19 May 2012 20:28:47 +0000
(13:28 -0700)
committer
Father Chrysostomos
<sprout@cpan.org>
Tue, 22 May 2012 01:09:35 +0000
(18:09 -0700)
Added by
0bdaccee3
and partly corrected by
b0bf6df7d
, this comment had
me befuddled enough to have to read it three times.
lib/overload.t
patch
|
blob
|
history
diff --git
a/lib/overload.t
b/lib/overload.t
index
a3a818c
..
2b07263
100644
(file)
--- a/
lib/overload.t
+++ b/
lib/overload.t
@@
-1151,8
+1151,8
@@
like ($@, qr/zap/);
sub numify { ${$_[0]} }
}
-# These a
re all check that overloaded values rather than reference addresses
-# are what
is
getting tested.
+# These a
ll check that overloaded values, rather than reference addresses,
+# are what
are
getting tested.
my ($two, $one, $un, $deux) = map {new Numify $_} 2, 1, 1, 2;
my ($ein, $zwei) = (1, 2);