diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-11-17 08:34:52 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-11-17 08:36:37 +0000 |
commit | 7bff8c334b79055a65ea37cb51de6d9629880b6c (patch) | |
tree | f73a3596596171fcd0a666eaafd6aedd21c2dcdd /op.c | |
parent | d90d5a3845e854b868ede5476fd329d1fb85fd46 (diff) | |
download | perl-7bff8c334b79055a65ea37cb51de6d9629880b6c.tar.gz |
Convert newSUB() to a macro wrapping Perl_newATTRSUB()
Provide a Perl_newSUB() function in mathoms.c for anyone referencing it by its
full name.
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -6056,12 +6056,6 @@ Perl_newMYSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block) } CV * -Perl_newSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *block) -{ - return Perl_newATTRSUB(aTHX_ floor, o, proto, NULL, block); -} - -CV * Perl_newATTRSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block) { dVAR; |