Front page | perl.perl5.porters |
Postings from March 2007
On Fri, Mar 23, 2007 at 11:30:03AM -0700, Rafael Garcia-Suarez wrote:
> Change 30730 by rgs@stcosmo on 2007/03/23 18:25:43
>
> Don't use PL_na.
> ==== //depot/perl/universal.c#160 (text) ====
> Index: perl/universal.c
> --- perl/universal.c#159~30679~ 2007-03-22 02:16:37.000000000 -0700
> +++ perl/universal.c 2007-03-23 11:25:43.000000000 -0700
> @@ -199,7 +199,7 @@
> if (sv_isobject(sv)) {
> classname = sv_reftype(SvRV(sv),TRUE);
> } else {
> - classname = SvPV(sv,PL_na);
> + classname = SvPV_nolen(sv);
> }
>
> if (strEQ(name,classname))
> End of Patch.
I was trying to work this out from the perl headers
a: Is there any way we can enforce this while -DPERL_CORE is true?
b: If so, would we want to?
Nicholas Clark