summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-11-17 08:34:52 +0000
committerNicholas Clark <nick@ccl4.org>2010-11-17 08:36:37 +0000
commit7bff8c334b79055a65ea37cb51de6d9629880b6c (patch)
treef73a3596596171fcd0a666eaafd6aedd21c2dcdd /op.c
parentd90d5a3845e854b868ede5476fd329d1fb85fd46 (diff)
downloadperl-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.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/op.c b/op.c
index 98adf8c18f..2e974fd3fd 100644
--- a/op.c
+++ b/op.c
@@ -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;