diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-03-24 14:16:15 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-03-24 14:16:15 +0100 |
| commit | fc8390768718c75e7007d3afdce4bc61fb3ea97b (patch) | |
| tree | 54391630223a32e6213b5ad9427fd52fbfc0628c /pod/perlsyn.pod | |
| parent | da9849c509b34ed24c215ecae6a458108a733936 (diff) | |
| download | perl-fc8390768718c75e7007d3afdce4bc61fb3ea97b.tar.gz | |
Fix equivalent code in perlsyn for Array~~Hash
It's an "any", not an "all". The synopsis 3 for Perl 6 has this code :
when $_ is an Array, and X is a Hash, $_ ~~ X means X.{any @$_}:exists.
Note that the implementation is right already (and was right in 5.10).
Diffstat (limited to 'pod/perlsyn.pod')
| -rw-r--r-- | pod/perlsyn.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlsyn.pod b/pod/perlsyn.pod index dbaa7a9d30..f356d55ada 100644 --- a/pod/perlsyn.pod +++ b/pod/perlsyn.pod @@ -688,7 +688,7 @@ entries apply in those cases. Any CodeRef scalar sub truth $b->($a) Hash Hash hash keys identical [sort keys %$a]~~[sort keys %$b] - Array Hash hash slice existence @$a == grep $_ ~~ $b, @$a + Array Hash hash slice existence grep $_ ~~ $b, @$a Regex Hash hash key grep grep /$a/, keys %$b undef Hash always false (undef can't be a key) Any Hash hash entry existence exists $b->{$a} |