don't segfault on blead [#83439]

Turns out newATTRSUB can return NULL for subs with parse errors since
commit 9ffcdca1f504cb09088413c074b35af4b7f247e3. Handle that case.

diff --git a/Parameters.xs b/Parameters.xs
index 64099fc..e5bbfba 100644 (file)
--- a/Parameters.xs
+++ b/Parameters.xs
@@ -1956,7 +1956,9 @@ static int parse_fun(pTHX_ Sentinel sen, OP **pop, const char *keyword_ptr, STRL
                        body
                );
 
-               register_info(aTHX_ PTR2UV(CvROOT(cv)), declarator, spec, param_spec);
+               if (cv) {
+                       register_info(aTHX_ PTR2UV(CvROOT(cv)), declarator, spec, param_spec);
+               }
 
                if (saw_name) {
                        *pop = newOP(OP_NULL, 0);