more complete support for implicit thread/interpreter pointer,

[p5sagit/p5-mst-13.2.git] / ext / ByteLoader / ByteLoader.xs

diff --git a/ext/ByteLoader/ByteLoader.xs b/ext/ByteLoader/ByteLoader.xs
index dd300be..e927d16 100644 (file)
--- a/ext/ByteLoader/ByteLoader.xs
+++ b/ext/ByteLoader/ByteLoader.xs
@@ -16,7 +16,7 @@ static I32
 #ifdef PERL_OBJECT
 byteloader_filter(CPerlObj *pPerl, int idx, SV *buf_sv, int maxlen)
 #else
-byteloader_filter(int idx, SV *buf_sv, int maxlen)
+byteloader_filter(pTHX_ int idx, SV *buf_sv, int maxlen)
 #endif
 {
     dTHR;