This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update core_prototype’s docs
authorFather Chrysostomos <sprout@cpan.org>
Tue, 9 Aug 2011 13:02:39 +0000 (06:02 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 14 Aug 2011 19:54:23 +0000 (12:54 -0700)
op.c

diff --git a/op.c b/op.c
index d4d89e4..4f8693a 100644 (file)
--- a/op.c
+++ b/op.c
@@ -10333,10 +10333,8 @@ Perl_custom_op_register(pTHX_ Perl_ppaddr_t ppaddr, const XOP *xop)
 =for apidoc core_prototype
 This function assigns the prototype of the named core function to C<sv>, or
 to a new mortal SV if C<sv> is NULL.  It returns the modified C<sv>, or
-NULL if the core function has no prototype.
-
-If the C<name> is not a Perl keyword, it croaks if C<croak> is true, or
-returns NULL if C<croak> is false.
+NULL if the core function has no prototype.  C<code> is a code as returned
+by C<keyword()>.  It must be negative and unequal to -KEY_CORE.
 
 =cut
 */