fixup use croak_caller() to report correct caller line number

Author: leonerd

pp.c

@@ -8045,7 +8045,7 @@ PP(pp_multiparam)
             else {
                 // TODO: Consider collecting up all the names of unrecognised
                 // in one string
-                croak("Unrecognized named parameter '%s' to subroutine '%" SVf "'",
+                croak_caller("Unrecognized named parameter '%s' to subroutine '%" SVf "'",
                     namepv, S_find_runcv_name());
             }
         }
@@ -8057,7 +8057,7 @@ PP(pp_multiparam)
 
             // TODO: Consider collecting up all the names of missing
             // parameters in one string
-            croak("Missing required named parameter '%s' to subroutine '%" SVf "'",
+            croak_caller("Missing required named parameter '%s' to subroutine '%" SVf "'",
                     named->namepv, S_find_runcv_name());
         }
     }

t/lib/croak/signatures

@@ -250,3 +250,17 @@ Can't use global %_ in subroutine signature at - line 2, near "(%_"
 sub t101 ($1) { }
 EXPECT
 Illegal operator following parameter in a subroutine signature at - line 2, near "($1"
+########
+# NAME missing required named
+no warnings 'experimental::signature_named_parameters';
+sub f (:$alpha, :$beta) { }  ## line 3
+f(alpha => 123);             ## line 4
+EXPECT
+Missing required named parameter 'beta' to subroutine 'main::f' at - line 4.
+########
+# NAME unrecognised named
+no warnings 'experimental::signature_named_parameters';
+sub f (:$alpha) { }             ## line 3
+f(alpha => 123, gamma => 456);  ## line 4
+EXPECT
+Unrecognized named parameter 'gamma' to subroutine 'main::f' at - line 4.