diff options
| author | Artur Bergman <sky@nanisky.com> | 2001-08-27 18:34:48 +0000 |
|---|---|---|
| committer | Artur Bergman <sky@nanisky.com> | 2001-08-27 18:34:48 +0000 |
| commit | 42d86a35a02527a1e39845fdb48ce9d028f4e633 (patch) | |
| tree | 002efe88084ee033303473e94482c55a5482f345 /perlapi.c | |
| parent | 438c221d2a8e6fa132b664b70062215bf9c6ef42 (diff) | |
| download | perl-42d86a35a02527a1e39845fdb48ce9d028f4e633.tar.gz | |
Removed tripple definitions of CUSTOM_OP functions.
p4raw-id: //depot/perl@11761
Diffstat (limited to 'perlapi.c')
| -rw-r--r-- | perlapi.c | 32 |
1 files changed, 0 insertions, 32 deletions
@@ -4229,38 +4229,6 @@ Perl_custom_op_desc(pTHXo_ OP* op) return ((CPerlObj*)pPerl)->Perl_custom_op_desc(op); } #endif -#if defined(PERL_CUSTOM_OPS) - -#undef Perl_custom_op_name -char * -Perl_custom_op_name(pTHXo_ OP* op) -{ - return ((CPerlObj*)pPerl)->Perl_custom_op_name(op); -} - -#undef Perl_custom_op_desc -char * -Perl_custom_op_desc(pTHXo_ OP* op) -{ - return ((CPerlObj*)pPerl)->Perl_custom_op_desc(op); -} -#endif -#if defined(PERL_CUSTOM_OPS) - -#undef Perl_custom_op_name -char * -Perl_custom_op_name(pTHXo_ OP* op) -{ - return ((CPerlObj*)pPerl)->Perl_custom_op_name(op); -} - -#undef Perl_custom_op_desc -char * -Perl_custom_op_desc(pTHXo_ OP* op) -{ - return ((CPerlObj*)pPerl)->Perl_custom_op_desc(op); -} -#endif #if defined(PERL_OBJECT) #else #endif |