This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Change #3053 missed perldelta.
[perl5.git] / byterun.h
index e8f4cc1..6e559ef 100644 (file)
--- a/byterun.h
+++ b/byterun.h
@@ -17,7 +17,9 @@ struct bytestream {
 };
 #endif /* INDIRECT_BGET_MACROS */
 
+#ifndef PERL_OBJECT
 void *bset_obj_store _((void *, I32));
+#endif
 
 enum {
     INSN_RET,                  /* 0 */
@@ -177,8 +179,8 @@ EXT int optype_size[]
 ;
 
 #define INIT_SPECIALSV_LIST STMT_START { \
-       specialsv_list[0] = Nullsv; \
-       specialsv_list[1] = &sv_undef; \
-       specialsv_list[2] = &sv_yes; \
-       specialsv_list[3] = &sv_no; \
+       PL_specialsv_list[0] = Nullsv; \
+       PL_specialsv_list[1] = &PL_sv_undef; \
+       PL_specialsv_list[2] = &PL_sv_yes; \
+       PL_specialsv_list[3] = &PL_sv_no; \
     } STMT_END