From: Yves Orton <demerphq@gmail.com>
Date: Sat, 4 Mar 2023 08:00:37 +0000 (+0100)
Subject: Upper.xs - in 5.37.6 cop_warnings became a char * (RCVP)
X-Git-Tag: rt146897^0
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;ds=sidebyside;h=c8fb3ada01d8c1a6ac1a37778edb0fc9164d7bf1;hp=c8fb3ada01d8c1a6ac1a37778edb0fc9164d7bf1;p=perl%2Fmodules%2FScope-Upper.git

Upper.xs - in 5.37.6 cop_warnings became a char * (RCVP)

It is actually a RCPV (RefCounted PV), so we can use RCPV_LEN() to
find its length.

Unfortunately there is not currently a way to "mortalize" a RCPV,
an oversight that I will correct in a future release of Perl. But
for now this should do.
---