This is a live mirror of the Perl 5 development currently hosted at
Fix up pad_check_dup entry in perlintern
authorFather Chrysostomos <>
Sun, 9 Oct 2011 06:31:07 +0000 (23:31 -0700)
committerFather Chrysostomos <>
Mon, 10 Oct 2011 06:14:07 +0000 (23:14 -0700)
When the pad API was added, the special

   m|pad_check_dup|SV *name|U32 flags|const HV *ourstash

sequence was added to pad.c, but that is unnecessary as it is listed
in embed.fnc.  Also it is not correct, as the name of the function is
in the return value field.

So this restore it back to the simple ‘=for apidoc pad_check_dup’.

The description of the function was in plain text like this:

Check for duplicate declarations: report any of:
     * a my in the current scope with the same name;
     * an our (anywhere in the pad) with the same name and the same stash
       as C<ourstash>
C<is_our> indicates that the name to check is an 'our' declaration

which gets rewrapped in rendered pod.  So this patch changes it to use
a verbatim block (as doesn’t seem to like pod lists).


diff --git a/pad.c b/pad.c
index c767b55..eb0cd5c 100644 (file)
--- a/pad.c
+++ b/pad.c
@@ -762,13 +762,15 @@ Perl_pad_add_anon(pTHX_ CV* func, I32 optype)
-=for apidoc m|pad_check_dup|SV *name|U32 flags|const HV *ourstash
+=for apidoc pad_check_dup
 Check for duplicate declarations: report any of:
      * a my in the current scope with the same name;
-     * an our (anywhere in the pad) with the same name and the same stash
-       as C<ourstash>
-C<is_our> indicates that the name to check is an 'our' declaration
+     * an our (anywhere in the pad) with the same name and the
+       same stash as C<ourstash>
+C<is_our> indicates that the name to check is an 'our' declaration.