diff options
Diffstat (limited to 'ext/ByteLoader/bytecode.h')
-rw-r--r-- | ext/ByteLoader/bytecode.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/ByteLoader/bytecode.h b/ext/ByteLoader/bytecode.h index ca9509f05e..7ce3e07280 100644 --- a/ext/ByteLoader/bytecode.h +++ b/ext/ByteLoader/bytecode.h @@ -204,7 +204,7 @@ typedef IV IV64; } STMT_END #define BSET_OBJ_STORE(obj, ix) \ (I32)ix > bstate->bs_obj_list_fill ? \ - bset_obj_store(aTHXo_ bstate, obj, (I32)ix) : (bstate->bs_obj_list[ix] = obj) + bset_obj_store(aTHX_ bstate, obj, (I32)ix) : (bstate->bs_obj_list[ix] = obj) /* NOTE: the bytecode header only sanity-checks the bytecode. If a script cares about * what version of Perl it's being called under, it should do a 'require 5.6.0' or |