This is a live mirror of the Perl 5 development currently hosted at
10 years agoTeach win32/Makefile 'test_porting'
Chris 'BinGOs' Williams [Fri, 16 Dec 2011 12:13:46 +0000 (12:13 +0000)]
Teach win32/Makefile 'test_porting'

10 years agoTeach win32/ 'test_porting'
Chris 'BinGOs' Williams [Fri, 16 Dec 2011 12:10:40 +0000 (12:10 +0000)]
Teach win32/ 'test_porting'

10 years agoperldelta up to 5dca8ed9d28
Father Chrysostomos [Fri, 16 Dec 2011 06:10:18 +0000 (22:10 -0800)]
perldelta up to 5dca8ed9d28

10 years agoAdd tlhackque to AUTHORS
Father Chrysostomos [Fri, 16 Dec 2011 06:10:04 +0000 (22:10 -0800)]
Add tlhackque to AUTHORS

10 years localise $SIG{__DIE__} before eval
Father Chrysostomos [Fri, 16 Dec 2011 06:07:06 +0000 (22:07 -0800)] localise $SIG{__DIE__} before eval

Otherwise we end up calling other code’s $SIG{__DIE__}.

10 years agoIncrease $Carp::VERSION to 1.24
Father Chrysostomos [Fri, 16 Dec 2011 05:42:02 +0000 (21:42 -0800)]
Increase $Carp::VERSION to 1.24

10 years agoCarp.t: Add tests for PL_last_in_gv
Father Chrysostomos [Fri, 16 Dec 2011 05:41:37 +0000 (21:41 -0800)]
Carp.t: Add tests for PL_last_in_gv

10 years agoAdd missing <fh> line # phrase to Carp messages
tlhackque [Fri, 16 Dec 2011 04:48:21 +0000 (20:48 -0800)]
Add missing <fh> line # phrase to Carp messages

Carp::croak is documented in the camel book as "working like die does,
except misdirecting blame to the caller."

Perldoc says "croak - die of errors (from perspective of caller)".

This is almost true, however careful inspection reveals that croak
does not include file position information ( ", <fh> line $." ) as die
does (when it can).

It turns out that it *is* possible to determine the current file han-
dle (although I wish it were easier).

Carp should do this and add it to the traceback, as it really is use-
ful information.

10 years agopp_hot.c: First letter of latin-1 classnames wasn't being checked correctly.
Brian Fraser [Tue, 13 Dec 2011 22:32:48 +0000 (19:32 -0300)]
pp_hot.c: First letter of latin-1 classnames wasn't being checked correctly.

Previously the first letter for latin-1 classnames was being mischecked, only
allowing ASCII, which caused an instance of the Unicode Bug for downgradable

10 years agoperldelta up to 5e5a1632
Father Chrysostomos [Fri, 16 Dec 2011 03:54:42 +0000 (19:54 -0800)]
perldelta up to 5e5a1632

plus the array_base feature

10 years agoName anon handles __ANONIO__
Father Chrysostomos [Fri, 16 Dec 2011 01:45:45 +0000 (17:45 -0800)]
Name anon handles __ANONIO__

rather than $__ANONIO__

That dollar sign *has* to have been a mistake.  In ck_fun, the
name was set to __ANONIO__, but it seems the change that added it
(afd1915d43) did not account for the fact that a little later on the
same function checks to makes sure it begins with a dollar sign, as it
could only be a variable name.

rv2gv’s use of $__ANONIO__ (added recently by yours truly) was just
copying was ck_fun was doing.

10 years agoDocument the array_base feature
Father Chrysostomos [Fri, 16 Dec 2011 00:34:36 +0000 (16:34 -0800)]
Document the array_base feature

10 years agoDisable $[ under 5.16
Father Chrysostomos [Fri, 16 Dec 2011 00:26:16 +0000 (16:26 -0800)]
Disable $[ under 5.16

This adds the array_base feature to

Perl_feature_is_enabled has been modified to use PL_curcop, rather
than PL_hintgv, so it can work with run-time hints as well.
(PL_curcop holds the current state op at run time, and &PL_compiling
at compile time, so it works for both.)  The hints in $^H are not
stored in the same place at compile time and run time, so the FEATURE_IS_ENABLED macro has been modified to check first whether
PL_curop == &PL_compiling.

Since array_base is on by default with no hint for it in %^H, it is
a ‘negative’ feature, whose entry in %^H turns it off.
has been modified to support such negative features.  The new FEATURE_IS_ENABLED_d can check whether such default features
are enabled.

This does make things less efficient, as every version declaration
now loads to disable all features (including turning off
array_base, which entails adding an entry to %^H) before loading the
new bundle.  I have plans to make this more efficient.

10 years Consistent use of spaces after full stops
Father Chrysostomos [Fri, 16 Dec 2011 00:19:05 +0000 (16:19 -0800)] Consistent use of spaces after full stops

10 years agoperlvar: document what $[ will do under use v5.16
Father Chrysostomos [Thu, 15 Dec 2011 05:43:38 +0000 (21:43 -0800)]
perlvar: document what $[ will do under use v5.16

10 years agoBring perldiag/‘Assigning non-zero to $[’ closer to reality
Father Chrysostomos [Thu, 15 Dec 2011 04:10:08 +0000 (20:10 -0800)]
Bring perldiag/‘Assigning non-zero to $[’ closer to reality

Or closer to what will imminently be its reality

10 years agoRestore ‘Assigning non-zero to $[’ to perldiag
Father Chrysostomos [Thu, 15 Dec 2011 02:10:49 +0000 (18:10 -0800)]
Restore ‘Assigning non-zero to $[’ to perldiag

This was removed by b82b06b8ca32.  The message is coming back soon, at
least under ‘use 5.016’....

10 years agoperldelta_template: revise text about incompatible changes
Karl Williamson [Wed, 14 Dec 2011 17:13:14 +0000 (10:13 -0700)]
perldelta_template: revise text about incompatible changes

10 years agoutf8.c: Change prototypes of two functions
Karl Williamson [Wed, 14 Dec 2011 16:29:33 +0000 (09:29 -0700)]
utf8.c: Change prototypes of two functions

_to_uni_fold_flags() and _to_fold_latin1() now have their flags
parameter be a boolean.  The name 'flags' is retained in case the usage
ever expands instead of calling it by the name of the only use this
currently has.

This is as a result of confusion between this and _to_ut8_fold_flags()
which does have more than one flag possibility.

10 years agoscope.c: Allow successful saving of PL_tainted
Karl Williamson [Wed, 14 Dec 2011 05:10:53 +0000 (22:10 -0700)]
scope.c: Allow successful saving of PL_tainted

leave_scope() saves and restores PL_tainted upon entry and exit.  This
means that any attempt to save this variable on the stack will fail, as
its unstacked value will overwrite the popped one.

To counteract this, we update our saved version with the popped value.

10 years agopp.c: Changing case of utf8 strings under locale uses locale for < 255
Karl Williamson [Wed, 14 Dec 2011 05:01:46 +0000 (22:01 -0700)]
pp.c: Changing case of utf8 strings under locale uses locale for < 255

As proposed on p5p and approved, this changes the functions uc(), lc(),
ucfirst(), and lcfirst() to respect locale for code points < 255; and
use Unicode semantics for those above 255.  This results in better, but
not perfect results, as noted in the changed pods, and brings these
functions into line with how regular expression pattern matching already

10 years agoutf8.c: White-space changes only
Karl Williamson [Wed, 14 Dec 2011 04:52:40 +0000 (21:52 -0700)]
utf8.c: White-space changes only

This indents previous lines that are now within new blocks

10 years agoutf8.c: Allow Changed behavior of utf8 under locale
Karl Williamson [Wed, 14 Dec 2011 04:48:19 +0000 (21:48 -0700)]
utf8.c: Allow Changed behavior of utf8 under locale

This changes the 4 case changing functions to take extra parameters to
specify if the utf8 string is to be processed under locale rules when
the code points are < 256.  The current functions are changed to macros
that call the new versions so that current behavior is unchanged.

An additional, static, function is created that makes sure that the
255/256 boundary is not crossed during the case change.

10 years agoutf8.c: Add comment
Karl Williamson [Wed, 14 Dec 2011 04:34:11 +0000 (21:34 -0700)]
utf8.c: Add comment

10 years agolocale.t: Prepare for adding more tests
Karl Williamson [Wed, 14 Dec 2011 04:24:24 +0000 (21:24 -0700)]
locale.t: Prepare for adding more tests

This custom TAP output .t has hard-coded test numbers.  Rather than
disturb those, I plan to add tests that come after all the current ones,
and this paves the way for that.

10 years agolocale.t: Add ability to output a message with 'ok'
Karl Williamson [Wed, 14 Dec 2011 04:20:12 +0000 (21:20 -0700)]
locale.t: Add ability to output a message with 'ok'

locale.t uses its own custom TAP messages.  This changes the 'ok' sub
to accept another parameter, a test description to add to the TAP line.
And it changes the taint functions to produce a generic one of these

10 years agoRevise documentation
David Golden [Thu, 15 Dec 2011 18:36:42 +0000 (13:36 -0500)]
Revise documentation

10 years agocore-cpan-diff: clarify phrasing of missing file warning
David Golden [Thu, 15 Dec 2011 16:13:23 +0000 (11:13 -0500)]
core-cpan-diff: clarify phrasing of missing file warning

10 years agoFix and META.yml for removal of lib/version.t
David Golden [Thu, 15 Dec 2011 14:35:53 +0000 (09:35 -0500)]
Fix and META.yml for removal of lib/version.t

10 years agoMerge CPAN tests into CORE.
John Peacock [Mon, 12 Dec 2011 17:57:11 +0000 (12:57 -0500)]
Merge CPAN tests into CORE.

It has become increasingly difficult to maintain the CPAN tests
and the CORE tests, so include the [subtly edited] CPAN tests
into the CORE code instead.  NOTE: this also bumps $VERSION to
match the forthcoming CPAN release.

Signed-off-by: David Golden <>
10 years agoUpdate threads to CPAN version 1.86
Chris 'BinGOs' Williams [Wed, 14 Dec 2011 23:02:38 +0000 (23:02 +0000)]
Update threads to CPAN version 1.86


  1.86 Wed Dec 14 21:12:51 2011
    - Fix for mingw-w64 build due to setjmp difference

10 years agoSync Module-CoreList MANIFEST file with what is on CPAN
Chris 'BinGOs' Williams [Wed, 14 Dec 2011 21:19:57 +0000 (21:19 +0000)]
Sync Module-CoreList MANIFEST file with what is on CPAN

10 years agoFix Module::Build entry in
David Golden [Wed, 14 Dec 2011 20:47:03 +0000 (15:47 -0500)]
Fix Module::Build entry in

Corrected path for CUSTOMIZED and updated the documentation of
CUSTOMIZED as a reminder for others.

10 years agoUpdate to quiet DAGOLDEN core-cpan-diff warnings
David Golden [Wed, 14 Dec 2011 20:39:57 +0000 (15:39 -0500)]
Update to quiet DAGOLDEN core-cpan-diff warnings

10 years agoReformatted for whitespace and layout consistency
Dave Rolsky [Wed, 14 Dec 2011 18:33:27 +0000 (12:33 -0600)]
Reformatted for whitespace and layout consistency

(12:16:39) autarch: can I just run perltidy on the whole file?
(12:16:59) rjbs: Yes.
(12:17:14) ***rjbs will take the heat, if there is any, unless you actually BREAK something. :-)
(12:17:30) rjbs: where something is not "my custom parser, written in 1995"

10 years agoMore files to exclude from the core-cpan-diff
Dave Rolsky [Wed, 14 Dec 2011 18:12:49 +0000 (12:12 -0600)]
More files to exclude from the core-cpan-diff

10 years agoperlfunc: Document kill without list of processes
Karl Williamson [Wed, 14 Dec 2011 17:09:57 +0000 (10:09 -0700)]
perlfunc: Document kill without list of processes

10 years agoperlsec: Fix example to localize $@.
Karl Williamson [Wed, 14 Dec 2011 16:41:26 +0000 (09:41 -0700)]
perlsec: Fix example to localize $@.

Not doing this can cause hard-to-find bugs.

10 years agoop/taint.t: localize $@
Karl Williamson [Wed, 14 Dec 2011 16:36:43 +0000 (09:36 -0700)]
op/taint.t: localize $@

This is so the subroutine's calling 'eval' won't affect things outside

10 years agolocale.t: Don't destroy caller's $@
Karl Williamson [Wed, 14 Dec 2011 04:16:50 +0000 (21:16 -0700)]
locale.t: Don't destroy caller's $@

This bug was very hard for me to find.  Leave the outside $@ untouched.

10 years agoperllocale: Don't mention /l modifier
Karl Williamson [Wed, 14 Dec 2011 04:13:10 +0000 (21:13 -0700)]
perllocale: Don't mention /l modifier

The /l modifier really shouldn't be used explicitly.  So remove this
mention of it.  It is documented in perlre, with appropriate cautions
against its explicit use.

10 years agoperllocale: Nits
Karl Williamson [Wed, 14 Dec 2011 04:08:33 +0000 (21:08 -0700)]
perllocale: Nits

This adds a clarification, a couple grammar and typo fixes, and outdents
some verbatim sections to fit within 79 columns.

10 years agocharnames: Add %Carp::Internal entry
Karl Williamson [Thu, 8 Dec 2011 01:18:34 +0000 (18:18 -0700)]
charnames: Add %Carp::Internal entry

This will be useful in a future commit.  charnames is about to be split
into two modules, one called by the other, and warnings::warn() would
otherwise return if warnings are enabled in the parent module.

10 years agocharnames and perlapi: pod nits
Karl Williamson [Sun, 4 Dec 2011 04:37:48 +0000 (21:37 -0700)]
charnames and perlapi: pod nits

10 years agocharnames: "Add 'use re "/aa"'
Karl Williamson [Sat, 1 Oct 2011 16:29:56 +0000 (10:29 -0600)]
charnames: "Add 'use re "/aa"'

This should add a slight performance improvement, and is usable since
all names are ASCII

10 years agoIgnore all tests in xt/ or tests of the form t/release-.*
Dave Rolsky [Wed, 14 Dec 2011 17:51:42 +0000 (11:51 -0600)]
Ignore all tests in xt/ or tests of the form t/release-.*

10 years agoNormalise some of the module updates in perldelta
Chris 'BinGOs' Williams [Wed, 14 Dec 2011 12:11:09 +0000 (12:11 +0000)]
Normalise some of the module updates in perldelta

10 years agoUpdate Digest-SHA to CPAN version 5.70
Chris 'BinGOs' Williams [Wed, 14 Dec 2011 12:09:12 +0000 (12:09 +0000)]
Update Digest-SHA to CPAN version 5.70


  5.70  Wed Dec 14 02:32:10 MST 2011
  - added BITS mode to addfile method and shasum
    -- partial-byte inputs now possible via files/STDIN
    -- allows shasum to check all 8074 NIST Msg vectors
      -- previously required special programming

10 years agoperldelta: Turn one-liner into a block of code
Father Chrysostomos [Tue, 13 Dec 2011 22:40:20 +0000 (14:40 -0800)]
perldelta: Turn one-liner into a block of code

so the line isn’t too long.

10 years agoperldelta up to 1881532246
Father Chrysostomos [Tue, 13 Dec 2011 17:40:22 +0000 (09:40 -0800)]
perldelta up to 1881532246

10 years agoEU::ParseXS: Silence undefined-value-in-addition warning
Steffen Mueller [Tue, 13 Dec 2011 17:21:52 +0000 (18:21 +0100)]
EU::ParseXS: Silence undefined-value-in-addition warning

Nothing serious, just happened sometimes when reporting line numbers for
errors. But warning during build process.

10 years agoUpdate CPAN-Meta-YAML to CPAN version 0.005
Chris 'BinGOs' Williams [Tue, 13 Dec 2011 18:06:55 +0000 (18:06 +0000)]
Update CPAN-Meta-YAML to CPAN version 0.005


  0.005     2011-12-13 12:57:24 EST5EDT

  - Generated from ADAMK/YAML-Tiny-1.50.tar.gz

  - Fix documentation to clarify that users are responsible for
    UTF-8 encoding/decoding

10 years ago[RT #78266] Don't leak memory when accessing named captures that didn't match
Ævar Arnfjörð Bjarmason [Tue, 13 Dec 2011 14:43:12 +0000 (14:43 +0000)]
[RT #78266] Don't leak memory when accessing named captures that didn't match

Since 5.10 (probably 44a2ac759e) named captures have been leaking
memory when they're used, don't actually match, but are later
accessed. E.g.:

    $ perl -wle 'for (1..10_000_000) { if ("foo" =~ /(foo|(?<capture>bar))?/) { my $capture = $+{capture} } } system "ps -o rss $$"'

Here we match the "foo" branch of our regex, but since we've used a
name capture we'll end up running the code in
Perl_reg_named_buff_fetch, which allocates a newSVsv(&PL_sv_undef) but
never uses it unless it's trying to return an array.

Just change that code not to allocate scalars we don't plan to
return. With this fix we don't leak any memory since there's nothing
to leak anymore.

    $ ./perl -Ilib -wle 'for (1..10_000_000) { if ("foo" =~ /(foo|(?<capture>bar))?/) { my $capture = $+{capture} } } system "ps -o rss $$"'

This reverts commit b28f4af8cf94eb18c0cfde71e9625081912499a8 ("Fix
allocating something in the first place is a better solution than
allocating it, not using it, and then freeing it.

10 years agoAdd Johannes Plunien to AUTHORS
Father Chrysostomos [Tue, 13 Dec 2011 17:30:07 +0000 (09:30 -0800)]
Add Johannes Plunien to AUTHORS

10 years agoAdd testcase for #78266.
Johannes Plunien [Tue, 13 Dec 2011 08:29:47 +0000 (12:29 +0400)]
Add testcase for #78266.

10 years agoFix #78266: Memory leak with named regexp captures.
Johannes Plunien [Tue, 13 Dec 2011 07:39:52 +0000 (11:39 +0400)]
Fix #78266: Memory leak with named regexp captures.

10 years agoMake scalar() propagate lvalueness
Father Chrysostomos [Tue, 13 Dec 2011 06:29:39 +0000 (22:29 -0800)]
Make scalar() propagate lvalueness

As mentioned in ticket #24346, scalar() should not change lvalueness.
The fact that it did was a side effect of the implementation and a
bug.  foo(scalar substr(....)) should pass a substr lvalue to foo just
as it would without scalar() or with a $ prototype (which is meant to
be equivalent to scalar()).

This also makes it possible to force scalar context in list assignment
to lvalue subroutines, as in (foo(), scalar bar()) = @list.

10 years agoperldelta for is_utf8_string()
Karl Williamson [Mon, 12 Dec 2011 16:21:40 +0000 (09:21 -0700)]
perldelta for is_utf8_string()

10 years agoSet all version object math ops to noop
John Peacock [Sun, 11 Dec 2011 02:51:02 +0000 (21:51 -0500)]
Set all version object math ops to noop

Explicitly handle all math operations with version objects as noop
instead of letting Perl handle it magically with nomethod.

Signed-off-by: David Golden <>
10 years agofix branch determination
David Mitchell [Mon, 12 Dec 2011 12:42:46 +0000 (12:42 +0000)]
fix branch determination

A previous commit of mine, 9077509c9b9bc1871867a5fba4351b95c670298d,
tried to handle the case where the output of 'git branch' was

    * (no branch)

to stop it outputting  a 'Use of uninitialized value' warning.
However, my "fix" broke in the case where multiple branches are listed
with the current not the first:

    * tmp1

Hopefully this fixes it properly.

10 years agoperldelta for e7d0a3fbd9 (tying PVMG COWs)
Father Chrysostomos [Mon, 12 Dec 2011 04:45:36 +0000 (20:45 -0800)]
perldelta for e7d0a3fbd9 (tying PVMG COWs)

10 years agoperldelta up to 0ea03996e7
Father Chrysostomos [Mon, 12 Dec 2011 04:03:25 +0000 (20:03 -0800)]
perldelta up to 0ea03996e7

10 years agoUpdate Socket to CPAN version 1.96
Chris 'BinGOs' Williams [Sun, 11 Dec 2011 09:42:07 +0000 (09:42 +0000)]
Update Socket to CPAN version 1.96


  1.96    CHANGES:
         * Fix Socket.t to use ok() instead of is() where required - RT73039
         * Complete rewrite of module docs; list all the constants and
           functions, updated SYNOPSIS
         * Added convenient Exporter tag :addrinfo for all the gai/gni-related
         * Provide static synthesized newSVpvn_flags() replacement for older
         * Implement getnameinfo() NIx_NOHOST and NIx_NOSERV extension flags

  1.95    CHANGES:
         * Implement the remaining AI_*, EAI_* and NI_* constants from
         * Declare configure-time dependency on ExtUtils::Constants 0.23 for
           when building out of core
         * Initial attempt at dual-life extraction from bleadperl

10 years agoRemove explicit support for pre-7.0 VMS and pre-6.0 DEC C.
Craig A. Berry [Sun, 11 Dec 2011 00:51:49 +0000 (18:51 -0600)]
Remove explicit support for pre-7.0 VMS and pre-6.0 DEC C.

OpenVMS v7.0 was released in 1995.  There have been no reports of
recent releases of Perl building on versions that far back, yet we
still have quite a bit of code that explicitly supports versions
*prior* to v7.0.

There is a similar story for DEC C v6.0.  It was released in 1998,
and has been superceded by numerous subsequent versions.  Yet the
VMS-specific code in the core is littered with workarounds and
hacks that defend against deficiencies in very old compiler

This code is for all practical purposes no longer maintained or
maintainable, so the best path forward seems to be to remove it.
Anyone able and willing to commit to long-term support of it
could argue for its restoration, assuming Perl 5.14.x is not

10 years agoRemove local $_ from Exporter
Father Chrysostomos [Sun, 11 Dec 2011 00:36:03 +0000 (16:36 -0800)]
Remove local $_ from Exporter

This was added in commit 732bb7c2d4f.

The changes in that commit did not necessitate the addition of
local $_.  So the localisation is wasting CPU cycles.  Worse, it
causes bugs in 5.12 and earlier.  (local $_ is always wrong if you
don’t control what is in $_ already, because it could be a read-only
tied variable.)  Actually, it causes bugs in 5.14-15 still, because
it seems that the changes to ‘local $_’ still weren’t sufficient (it
still calls FETCH, but not STORE).  That itself needs fixing, but that
should not obviate the need for this change, as Exporter has been liv-
ing a double life.

10 years agoIncrease $Exporter::VERSION to 5.66
Father Chrysostomos [Sun, 11 Dec 2011 00:20:33 +0000 (16:20 -0800)]
Increase $Exporter::VERSION to 5.66

10 years agoUpdate CPANPLUS to CPAN version 0.9113
Chris 'BinGOs' Williams [Sat, 10 Dec 2011 20:45:47 +0000 (20:45 +0000)]
Update CPANPLUS to CPAN version 0.9113


  Changes for 0.9113      Fri Dec  9 16:05:07 2011
  * Add more detail and reason for NA to NA reports

10 years agoperlguts: nits
Karl Williamson [Sat, 10 Dec 2011 19:57:05 +0000 (12:57 -0700)]
perlguts: nits

This fixes a few typos, adds a few clarifications, and fixes too wide
verbatim lines

10 years agodocument run_multiple_progs
Tony Cook [Sat, 26 Nov 2011 03:10:22 +0000 (14:10 +1100)]
document run_multiple_progs

10 years agotest for various fatal messages from op.c
Tony Cook [Mon, 28 Nov 2011 11:57:34 +0000 (22:57 +1100)]
test for various fatal messages from op.c

10 years agorefactor croak.t to be data driven (like warnings.t)
Tony Cook [Sat, 26 Nov 2011 03:10:05 +0000 (14:10 +1100)]
refactor croak.t to be data driven (like warnings.t)

10 years agoIncrease ExtUtils::Packlist::VERSION to 1.45
Father Chrysostomos [Fri, 9 Dec 2011 21:31:18 +0000 (13:31 -0800)]
Increase ExtUtils::Packlist::VERSION to 1.45

10 years agoCorrect POD formatting error: '=back' should be within '=begin =end' block.
jkeenan [Fri, 9 Dec 2011 02:39:09 +0000 (21:39 -0500)]
Correct POD formatting error: '=back' should be within '=begin =end' block.

10 years agoIncrease $I18N::LangTags::VERSION to 0.38
Father Chrysostomos [Fri, 9 Dec 2011 21:27:46 +0000 (13:27 -0800)]
Increase $I18N::LangTags::VERSION to 0.38

10 years agoupdate link to ISO 639-2
Alexandr Ciornii [Sun, 16 Oct 2011 00:25:07 +0000 (03:25 +0300)]
update link to ISO 639-2

10 years agoUpdate UNIVERSAL::VERSION POD to reflect reality.
John Peacock [Fri, 9 Dec 2011 01:55:37 +0000 (20:55 -0500)]
Update UNIVERSAL::VERSION POD to reflect reality.

This should have been done when version objects were originally
added to the core back in 5.10.0.  Mea culpa.

[I bumped version and added a perldelta entry. -- DG]

Signed-off-by: David Golden <>
10 years agoSync up tests with upstream
John Peacock [Wed, 7 Dec 2011 02:00:36 +0000 (21:00 -0500)]
Sync up tests with upstream

Pull in the contents of t/ (more or less) from the CPAN
release of

Signed-off-by: David Golden <>
10 years agoUse syntax from perlguts for testing objects
John Peacock [Wed, 7 Dec 2011 01:55:09 +0000 (20:55 -0500)]
Use syntax from perlguts for testing objects

The following paragraph is in perlguts.pod:

   To check if you've got an object derived from a specific class you have
   to write:

       if (sv_isobject(sv) && sv_derived_from(sv, class)) { ... }

which does the right thing with magical things like tied scalars.

Signed-off-by: David Golden <>
10 years agoRevert 9bf41c1d to UNIVERSAL::VERSION
John Peacock [Wed, 7 Dec 2011 01:52:11 +0000 (20:52 -0500)]
Revert 9bf41c1d to UNIVERSAL::VERSION

Return the previous behavior where CLASS->VERSION will return a
stringified version object of the contents of $CLASS::VERSION.

Signed-off-by: David Golden <>
10 years agoFix segfault on overloaded arithmetic assignment
David Golden [Fri, 9 Dec 2011 19:32:08 +0000 (14:32 -0500)]
Fix segfault on overloaded arithmetic assignment

Consider an arithmetic assignment operation of the form

  $left += $right

A segfault was occuring in the case where $right is an overloaded object
but $left is not; and where $right does not override "+=" but does
provide a 'nomethod' override.  Internally, Perl_amagic_call was
attempting to clone $left as if it were an overloaded object, causing the
segfault.  This commit fixes the segfault by only cloning the left
operand when the left operand is the overloaded one.

10 years agoRemove "support" for using malloc.c outside the perl core distribution.
Nicholas Clark [Thu, 8 Dec 2011 10:43:06 +0000 (11:43 +0100)]
Remove "support" for using malloc.c outside the perl core distribution.

It only ever worked properly in 5.005.

Commit d720c4410d3a0730 from June 1998 is the first known version of malloc.c
that would compile stand alone, without needing a config.h
Commit 5bbd1ef51ee0ebfa from December 1998 will not compile by default,
but will if one provides suitable definitions of simple macros on the command
Commit 427181846486e3aa from September 1999 will not compile with command
line flags alone.

12 years later, no-one has reported problems, so it's safe to remove this.

10 years agoRemove commented-out "support" for perl's malloc with x2p.
Nicholas Clark [Thu, 8 Dec 2011 10:12:25 +0000 (11:12 +0100)]
Remove commented-out "support" for perl's malloc with x2p.

In 1998 commit 30e2e4257067d5f8 stated

    temporarily disable perl malloc for a2p until we clean up
    conflicting malloc() declarations everywhere

and nothing has changed since. 13 years later, no-one has reported problems,
so it's safe to remove it.

10 years agoperl.h can include embed.h in the same location on all operating systems.
Nicholas Clark [Thu, 8 Dec 2011 14:30:02 +0000 (15:30 +0100)]
perl.h can include embed.h in the same location on all operating systems.

Commit 22c35a8c2392967a (October 1988) added a #include "embed.h" later in
perl.h for when building with PERL_OBJECT defined. Commit d18c61170a306915
(November 1988) added an effectively duplicate #include for all WIN32.

Commit 0cb9638729211ea7 (June 1999) corrected the made the earlier #include
in perl.h also conditional on !PERL_OBJECT (in addition to the
!PERL_FOR_X2P added by 22c35a8c2392967a), but it wasn't until commit
d18c61170a306915 (November 1999) that this changed this to !WIN32, and
embed.h was included exactly once by perl.h (as a2p never actually includes

Commit acfe0abcedaf592f (August 2001) removed the PERL_OBJECT code from
perl.h, reducing the duplication somewhat, but commit 96e176bf068724d0
(October 2001) created analogous special case duplication for VMS, and
commit 27da23d53ccce622 (April 2005) for Symbian. Commit eb8433b7af0f2e09
(March 2006) then neatly put the same #ifndef PERL_MAD code after all 4
locations that included embed.h and commit b3f24c00097febc1 (April 2006)
made the same correction in all 4 places.

But, the daft part of all this is that there was no reason why Win32 was
special - every other operating system can build perl with embed.h included
later in perl.h

Hence the earlier 3 locations can be eliminated, and the was-just-Win32
location made unconditional.

Which saves some lines of code. But fewer lines than are in this commit

10 years agoperl.h doesn't need special cases for x2p, as x2p doesn't include it.
Nicholas Clark [Thu, 8 Dec 2011 12:16:43 +0000 (13:16 +0100)]
perl.h doesn't need special cases for x2p, as x2p doesn't include it.

Commit 22c35a8c2392967a in October 1998 added an #if !defined(PERL_FOR_X2P)
guard to prevent perl.h from including embed.h when being used to compile
a2p. However, this was not needed even then, because embed.h only contains
pre-processor directives (mostly #define) related to tokens unused in a2p's
C code, so its continued inclusion would not have any effect. Moreover a2p
never actually included perl.h from its own code - only its copy of malloc.c
would include perl.h, and that only if perl was configured to use its own
malloc. But even x2p's use of malloc.c had been "temporarily disabled" by
commit 30e2e4257067d5f8 1 month earlier, so there was never a need for this.

10 years agoRemove the obsolete code for NO_EMBED from sdbm.h
Nicholas Clark [Fri, 9 Dec 2011 15:43:21 +0000 (16:43 +0100)]
Remove the obsolete code for NO_EMBED from sdbm.h

Support for NO_EMBED was removed by commit 22c35a8c2392967 in 1998.
Minitrue attempted to eliminate all mention of it in 2003 with commit
a0a44e237c19cc2b, but missed this code in sdbm.h

10 years agoUpdate READMEs and Pod with the updated URLs at
Steve Peters [Fri, 9 Dec 2011 14:56:51 +0000 (09:56 -0500)]
Update READMEs and Pod with the updated URLs at

10 years agoMade "c [line_num]" working again.
Shlomi Fish [Wed, 7 Dec 2011 17:36:39 +0000 (19:36 +0200)]
Made "c [line_num]" working again.

This is a bug-fix to .

Both the fix and a regression tests were added.

10 years agoperldelta up to e08f19f5d07
Father Chrysostomos [Fri, 9 Dec 2011 06:32:51 +0000 (22:32 -0800)]
perldelta up to e08f19f5d07

10 years agoTest out-of-bounds warning with lv substr
Father Chrysostomos [Fri, 9 Dec 2011 06:21:51 +0000 (22:21 -0800)]
Test out-of-bounds warning with lv substr

10 years agoperldelta up to a74fb2cdc8f
Father Chrysostomos [Fri, 9 Dec 2011 06:15:31 +0000 (22:15 -0800)]
perldelta up to a74fb2cdc8f

plus some later commits dealing with substr

10 years agoperldelta up to 611272bb8
Father Chrysostomos [Fri, 9 Dec 2011 04:45:21 +0000 (20:45 -0800)]
perldelta up to 611272bb8

10 years agostat() fix for write but not read permission on a directory.
Craig A. Berry [Fri, 9 Dec 2011 02:50:17 +0000 (20:50 -0600)]
stat() fix for write but not read permission on a directory.

9b9f19dadd2 missed one corner case where we do actually need to
stat the directory file and not just the name without the .DIR. If
we have write but not read access to the directory, then
stat('foo.DIR') succeeds but stat('foo') fails.  So if the first
stat failed fileify and try again.

10 years agoperldelta up to 47a0660e68
Father Chrysostomos [Fri, 9 Dec 2011 02:12:09 +0000 (18:12 -0800)]
perldelta up to 47a0660e68

10 years agoperldelta for efcf35c4ce
Father Chrysostomos [Fri, 9 Dec 2011 01:51:36 +0000 (17:51 -0800)]
perldelta for efcf35c4ce

10 years agoperldelta up to c70a25495
Father Chrysostomos [Fri, 9 Dec 2011 01:03:42 +0000 (17:03 -0800)]
perldelta up to c70a25495

10 years agoperldelta up to e38acfd7
Father Chrysostomos [Fri, 9 Dec 2011 00:16:32 +0000 (16:16 -0800)]
perldelta up to e38acfd7

10 years agoRetroactively add newCONSTSUB_flags to 5154delta
Father Chrysostomos [Fri, 9 Dec 2011 00:13:11 +0000 (16:13 -0800)]
Retroactively add newCONSTSUB_flags to 5154delta

10 years ago[perl #97476] Deparse not() following the llafr
Father Chrysostomos [Thu, 8 Dec 2011 22:53:50 +0000 (14:53 -0800)]
[perl #97476] Deparse not() following the llafr

not() follows the looks-like-a-function rule, unlike its high-prece-
dence counterpart.  So deparsing

    not +($foo || die) && $baz


    not ($foo || die) && $baz

is incorrect, as the && $baz part is no longer part of the argu-
ment to not().

10 years ago[perl #77172] Deparse &{&} as &{&}, not &&
Father Chrysostomos [Thu, 8 Dec 2011 22:35:27 +0000 (14:35 -0800)]
[perl #77172] Deparse &{&} as &{&}, not &&

&& is always tokenised as the logical-and operator, and never as the
&{&} subroutine.  B::Deparse needs to know about this.

(Oddly enough, ** can be exponentiation or the *{*} glob.)

10 years agoMore tests for deparsing warn()+1, etc.
Father Chrysostomos [Thu, 8 Dec 2011 22:27:15 +0000 (14:27 -0800)]
More tests for deparsing warn()+1, etc.