Smart match when a hash is on the RHS

This implement the new semantics of C<~~ HASH> smart matching.
This also reveals that overloading actually does not work at all.
Add also tests for C<undef ~~ %hash>.

Reverse the order of operands for several "~~ hash" tests

This way the hash is on the right.
Some of those tests will need to become symmetrical later.

Remove obsolete or redundant tests

Document that empty sets don't smart-match

(and implement this for the C<~~ coderef> form)

Test that in "~~ sub", the sub is not called on empty hashes and arrays

Fix a warnings test that was failing due to smart match dispatch changes

Iterative smart match over keys/elements when a coderef is on the RHS

Make smart matching ~~ undef dispatch only on the RHS

Some tests reorgarnisation for ~~ against undef and objects

Remove special case for coderefs with empty prototypes in smart match

(plus, fix a metasyntactic name clash in the switch test)

Make the "..." flip-flop operator work in scalar context in when()

The new smart match dispatch table for 5.10.1 onwards

This /does/ break backwards compatibility. Changes to come are:

- ~~ is no longer commutative. Dispatch is now done based on the
  (run-time) type of the right side argument.
- The right side can be a ".." range, which will be treated specially,
  and no longer as a boolean operator (as in scalar context).
- when() should treat "..." as a boolean operator.
- Coderefs with an empty prototype are no longer special.
- Any ~~ Array distributes the smart match test.
- Comparing two coderefs is no longer a special case and does not
  perform referential equality. (Use \&foo ~~ "".\&bar for that.)

This patch also documents that ~~ won't work on objects that don't
overload it, except in the expression $object ~~ undef.

Remove TODO tests about && in when() clauses

when() actually behaves as documented in perlsyn. It treats "E1 && E2"
expressions as booleans only if E1 is boolean, and if not, it does the
equivalent of the smart match expression "$_ ~~ (E1 && E2)". As long as
the ~~ operator is not expected to distribute boolean expressions found
on its right side, the current behaviour of perl is correct.

So, should we expect ~~ to distribute boolean expressions ? Given that
this would be rather complex to implement and test correctly with
complex expressions, given that we don't expect =~ to distribute either,
and given that when() is already quite smart regarding boolean
operators, I see no motivation for that feature.

This allows to close bug #50538 as "won't fix".

Document that when() treats specially most of the filetest operators

Make // behave like || in when clauses

(plus minor documentation updates about "when")

Update Archive::Extract to 0.31_02

Add a failing test for stack corruption with MULTICALL

Update Parse::CPAN::Meta to 0.04_01

Add Parse::CPAN::Meta to Porting/Maintainers.pl

Add contact info for Simon Wistow in Porting/Maintainers.pl

Remove the MANIFEST from Compress-Raw-Bzip2

(it wasn't the same in the CPAN distribution anyway)

Bump versions to 0.12 to sync with CPAN version

Integrate Parse::CPAN::Meta 0.04 into core

Update CPANPLUS to 0.85_06

Bump versions to 0.10 for CPAN sync

Make util.c compile on systems without getcwd()

Better gitignore file for Compress-Raw-Bzip2

Add Compress-Raw-Bzip2, by Paul Marquess

Mark modules upgraded today as "upstream from CPAN"

Update CPANPLUS::Dist::Build to 0.08

Update to Term::ANSIColor 2.00

Make deprecate.pm work on VMS.

Hash::Util::FieldHash 1.03 leaks SVs which are used as object IDs stored in mg->mg_obj

NAME section must fit on one line

rewrote deprecate test using File::Spec

add standard documentation to deprecate

6c0ec79a2e9c445ac9999df2 failed to build from distclean - also tweak make_ext.pl

Remove spurious TODO indicators

By definition, the first test in a series for testing a
leak should always succeed

Correct the paths for the nonxs_ext targets, following the ext flattening.
(Static and dynamic each build a target in lib/auto, which was unchanged.
nonxs_ext use a target inside the extension's directory, which was moved, but
Makefile.SH had not been updated to reflect this.)

Remove needless sed line added with 4318d5a0158916acc059aa8e6af84037cb7296b9.

Make non-blocking mode work on Windows in IO::Socket::INET

CPAN RT bug #43573

Update Filter::Util::Call to 1.08

fix typo in pod/perlperf.pod

MakeMaker is first-come in Maintainers.pl.

Says Schwern in Message-ID: <49A5290F.1060400@pobox.com>.

test script for deprecate.pm

First pass at tests for deprecate.pm.

Had to modify the module to provide an interface for testing - need to
provide fake install directories, but deprecated reads from
%Config::Config, which is read only.

add-package.pl fixup

Sometimes, using find, add-package.pl will construct filenames with 2
consecutive slashes, ie:

 Package-Name/bin//script.pl

As this literal string isn't in the MANIFEST yet, it'll be added
erroneously. The below patch fixes this.

remove explicit caller depth in deprecate.pm by searching caller stack for use/require Module.pm

Fix line number test for scalar attribute handlers

Un-TODO the tests for bleadperl and above

Fix to installing non-xs ext's in priv lib

Upgrade to threads::shared 1.28

Upgrade to threads 1.72

In S_parse_body(), sv hasn't been needed since -P bit the dust.
(And probably should have been removed with change 32958,
2f3529075cdaceeaf619b8bd308885878ec9828a)

Merge branch 'blead' of ssh://stevep@perl5.git.perl.org/gitroot/perl into blead

fileno() was failing when passed a NULL.  I'm guessing that we don't really need to increase the refcount on a NULL fd.

Fix unused variable warning

Attached patch fixes the following build warnings:

perlmini.c: In function `S_incpush':
perlmini.c:4358: warning: unused variable `addoldvers'

perl.c: In function `S_incpush':
perl.c:4358: warning: unused variable `addoldvers'

From 87b6dbeb18691177a2b2e8dc971da242ac831c03 Mon Sep 17 00:00:00 2001
From: Jerry D. Hedden <jdhedden@cpan.org>
Date: Mon, 23 Feb 2009 10:58:14 -0500
Subject: [PATCH] Fix unused variable warning

Re-apply cd5cc49dbc0e5ee748252c2da8b435855908e6d2 (Module::Build on VMS, #42724)

Update to Module::Build 0.31_04 (with a tweak to MBTest.pm)

Temporarily reverse out change cd5cc49dbc0e5ee748252c2da8b435855908e6d2.

Module::Build Changes from 0.31012, which hadn't been updated.

Add deprecate.pm. Deprecate shipping Switch.pm in the core distribution.

vms.c - Remove .DIR; in UNIX mode.

When doing a readdir() or glob() with DECC$FILENAME_UNIX_REPORT active,
the ".DIR" suffix needs to be removed for directories.

VMS-specific nit in S_init_perllib after 2cace6acdfad87b2d298bff18b91b339c18fd1e3.

time_t is unsigned 32-bit on VMS; pick sGMTIME_max and sLOCALTIME_max accordingly.

For S_incpush(), dir is never NULL, and len is always > 0.

Optimise S_incpush() by avoiding repeatedly copying libdir to subdir.
Specifically, copy it once with newSVsv(), then pass libdir to
S_incpush_if_exists(), and if that creates a new SV, use newSVsv() there to
re-do the copy. Otherwise reset the length of the passed-in SV (which is
subdir), back to the length of libdir, effectively truncating it back to be
equal to libdir. This avoids repeated copying of the same bytes over the same
memory that already holds those bytes.

In S_incpush, move the declaration of subdir inside the only block that uses it.

Tidy up incpush. Re-order the macros, and re-indent some code.

Move unversioned directories in PERL_OTHERLIBDIRS later in @INC.
Split INCPUSH_ADD_SUB_DIRS into INCPUSH_ADD_VERSIONED_SUB_DIRS and
INCPUSH_ADD_ARCHONLY_SUB_DIRS, and tweak the flags used for the two halves of
PERL_OTHERLIBDIRS so that .../$archname and .../ come after .../$old_version

7fc731078209e8c26ed8bba477edfd90724c7146 missed one (addsubdirs || addoldvers).

In S_init_perllib(), push the bare VENDORLIB_STEM onto @INC after its subdirs.

In S_init_perllib(), push the bare SITELIB_STEM onto @INC after its subdirs.

In S_incpush(), move push @INC, ".../$archname" if -d ".../$archname"; later.

This effects this change:

--- Start       2009-02-21 14:04:40.000000000 +0100
+++ /dev/fd/63  2009-02-22 16:41:18.000000000 +0100
@@ -1,14 +1,14 @@
 /Users/nick/Sandpit/511v/hashbangI/5.11.0/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/hashbangI/5.11.0
-/Users/nick/Sandpit/511v/hashbangI/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/hashbangI/5.11.-2/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/hashbangI/5.11.-2
+/Users/nick/Sandpit/511v/hashbangI/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/hashbangI
 /Users/nick/Sandpit/511v/cliI/5.11.0/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/cliI/5.11.0
-/Users/nick/Sandpit/511v/cliI/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/cliI/5.11.-1/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/cliI/5.11.-1
+/Users/nick/Sandpit/511v/cliI/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/cliI
 /Users/nick/Sandpit/511v/perl5lib0/5.11.0/darwin-thread-multi-64int-2level
 /Users/nick/Sandpit/511v/perl5lib0/5.11.0

In S_init_perllib(), initialise perl5lib to NULL, to keep trace flow happy.

In S_incpush(), replace (addsubdirs || addoldvers) with a constant variable.

In S_init_perllib(), s can be const char*

In S_init_perllib(), only call PerlEnv_getenv("PERL5LIB") once.

Unwind the implicit loop in S_init_perllib(), by writing the code out longhand.
Call it only once, remove the old_vers parameter, and all the related
conditional code.

Change the value passed into S_init_perllib() to a boolean flag.

NetWare has PRIVLIB_EXP as something other than a string constant. Cope with it.

Use "system" gmtime in time64 on VMS so C<vmsish 'time'> pragma works.

It's not really the system gmtime; it's the homegrown one in vms/vms.c
that checks hints and does shifting between UTC and local time when
requested.

In S_init_perllib(), correct errors in the MACOS_TRADITIONAL conditional code.
(Errors that originated in a26c0e281cb6068a8d148933281d8186f1eb4206 and
50d61629dc7fe34f077b9f66c50287d839e06378)

Re-apply changes 4adc95e616bac7ee and 200cbd6aa595a074 (RT #61492)
(ExtUtils::MM_Win32 should not generate "mt" command when CRT is statically
linked)(We'd failed to send this one upstream. Bad us.)

Upgrade to ExtUtils::MakeMaker 6.49_01

Skip time64 when there is no 64-bit integer type available.

The y2038 code currently requires that a 64-bit integer type be available,
so the build falls down hard if we try to use it where there isn't one.  A
better fix might be to try NV for time_t and a 32-bit integer for year.

N.B.  We test for the definedness of Quad_t rather than HAS_QUAD since the
latter is explicitly undef'd in the case where 64-bit types are available
but are not being used for Perl's IV and UV.

Avoid VMS long filename support on older systems that don't have it.

Move redefinition of lstat above its first use in vms/vms.c.

More smartmatch tests

This includes a TODO for overloaded objects.
Tests will need to be augmented and better organized.

Add a parameter to win32_get_{priv,site,vendor}lib(), to return the length,
as we already know it, and use it in S_init_perllib() to save a strlen() in
S_incpush_use_sep().

Text::Wrap maintained via the CPAN release

Check for thread failure in prime number example

Silence a casting warning with memchr()

Wonky example in perlthrtut

Fix at least the syntax of the example.
See : Message-ID: <F00A81D78228413FBED223C3919BE75B@Amelie>

Merge branch 'blead' of ssh://perl5.git.perl.org/gitroot/perl into blead

Remove the -x from the cherry pick and show how to merge the whole branch (suggested by rgs)

Reorder and complete tests for smart matching with objects

Fix {%hash} ~~ %hash test

This was not parsed as a smart match, because {%hash} was taken
as a block, not a an anonymous hash.

Also, avoid to construct an anonymous hash with an odd number of
elements.

Better diagnostics for the ~~ test

Read from DATA line per line, so warnings are reported from the correct
line. Make test names and error reports more readable.

Remove an extra space

Add a section on merging from a branch via GitHub

Fixed missing word in Text::Wrap POD
(cherry picked from commit 3adac458cb1c1d41af47fc66e67b49c8dec2323f)