bl_getc(struct byteloader_fdata *data)
{
dTHX;
- if (SvCUR(data->datasv) <= data->next_out) {
+ if (SvCUR(data->datasv) <= (STRLEN)data->next_out) {
int result;
/* Run out of buffered data, so attempt to read some more */
*(SvPV_nolen (data->datasv)) = '\0';
}
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;
bstate.bs_sv = Nullsv;
bstate.bs_iv_overflows = 0;
- byterun(aTHXo_ &bstate);
+ byterun(aTHX_ &bstate);
if (PL_in_eval) {
OP *o;
PROTOTYPES: ENABLE
void
-import(...)
+import(package="ByteLoader", ...)
+ char *package
PREINIT:
SV *sv = newSVpvn ("", 0);
PPCODE:
filter_add(byteloader_filter, sv);
void
-unimport(...)
+unimport(package="ByteLoader", ...)
+ char *package
PPCODE:
filter_del(byteloader_filter);