diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2001-08-31 20:58:38 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2001-08-31 20:58:38 +0000 |
| commit | acfe0abcedaf592fb4b9cb69ce3468308ae99d91 (patch) | |
| tree | a2ca08c77d2b63d1777d0b228ff53362895c1624 /ext/ByteLoader/ByteLoader.xs | |
| parent | 25f58aea15b072f74afcee1b9074d33e8e7348b5 (diff) | |
| download | perl-acfe0abcedaf592fb4b9cb69ce3468308ae99d91.tar.gz | |
remove deprecated PERL_OBJECT cruft, it has long since stopped
working in 5.7.x
p4raw-id: //depot/perl@11803
Diffstat (limited to 'ext/ByteLoader/ByteLoader.xs')
| -rw-r--r-- | ext/ByteLoader/ByteLoader.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/ByteLoader/ByteLoader.xs b/ext/ByteLoader/ByteLoader.xs index d8b15c102a..d559bfe57f 100644 --- a/ext/ByteLoader/ByteLoader.xs +++ b/ext/ByteLoader/ByteLoader.xs @@ -75,7 +75,7 @@ bl_read(struct byteloader_fdata *data, char *buf, size_t size, size_t n) } static I32 -byteloader_filter(pTHXo_ int idx, SV *buf_sv, int maxlen) +byteloader_filter(pTHX_ int idx, SV *buf_sv, int maxlen) { OP *saveroot = PL_main_root; OP *savestart = PL_main_start; @@ -92,7 +92,7 @@ byteloader_filter(pTHXo_ int idx, SV *buf_sv, int maxlen) bstate.bs_sv = Nullsv; bstate.bs_iv_overflows = 0; - byterun(aTHXo_ &bstate); + byterun(aTHX_ &bstate); if (PL_in_eval) { OP *o; |