additional cleanups for cygwin32 port

[perl5.git] / byterun.h

diff --git a/byterun.h b/byterun.h
index d5ff00b..3aac6fa 100644 (file)
--- a/byterun.h
+++ b/byterun.h
@@ -1,5 +1,5 @@
 /*
- *      Copyright (c) 1996-1998 Malcolm Beattie
+ *      Copyright (c) 1996-1999 Malcolm Beattie
  *
  *      You may distribute under the terms of either the GNU General Public
  *      License or the Artistic License, as specified in the README file.
@@ -15,13 +15,8 @@ struct bytestream {
     int (*fread)(char *, size_t, size_t, void*);
     void (*freadpv)(U32, void*);
 };
-void byterun _((struct bytestream));
-/* #else
-void byterun _((PerlIO *)); */
 #endif /* INDIRECT_BGET_MACROS */
 
-void *bset_obj_store _((void *, I32));
-
 enum {
     INSN_RET,                  /* 0 */
     INSN_LDSV,                 /* 1 */
@@ -139,10 +134,11 @@ enum {
     INSN_COP_SEQ,                      /* 113 */
     INSN_COP_ARYBASE,                  /* 114 */
     INSN_COP_LINE,                     /* 115 */
-    INSN_MAIN_START,                   /* 116 */
-    INSN_MAIN_ROOT,                    /* 117 */
-    INSN_CURPAD,                       /* 118 */
-    MAX_INSN = 118
+    INSN_COP_WARNINGS,                 /* 116 */
+    INSN_MAIN_START,                   /* 117 */
+    INSN_MAIN_ROOT,                    /* 118 */
+    INSN_CURPAD,                       /* 119 */
+    MAX_INSN = 119
 };
 
 enum {
@@ -180,8 +176,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