diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-08 18:47:35 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-08 18:47:35 +0000 |
commit | 51371543ca1a75ed152020ad0846b5b8cf11c32f (patch) | |
tree | 9bfd9a21697b0769e2681483631c742642dd8c45 /ext | |
parent | 4d61ec052de5c3a91dc64c80c032c2cbec44d845 (diff) | |
download | perl-51371543ca1a75ed152020ad0846b5b8cf11c32f.tar.gz |
more PERL_OBJECT cleanups (changes still untested on Unix!)
p4raw-id: //depot/perl@3660
Diffstat (limited to 'ext')
-rw-r--r-- | ext/Opcode/Opcode.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Opcode/Opcode.xs b/ext/Opcode/Opcode.xs index 100e6f8d68..c7d5f3ef1c 100644 --- a/ext/Opcode/Opcode.xs +++ b/ext/Opcode/Opcode.xs @@ -209,7 +209,7 @@ opmask_addlocal(pTHX_ SV *opset, char *op_mask_buf) /* Localise PL_op_mask then * is disallowed by Borland */ if (opcode_debug >= 2) - SAVEDESTRUCTOR((void(CPERLscope(*))(void*))warn,"PL_op_mask restored"); + SAVEDESTRUCTOR((void(*)(void*))Perl_warn,"PL_op_mask restored"); #endif PL_op_mask = &op_mask_buf[0]; if (orig_op_mask) |