X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=byterun.h;h=6e559ef4ff9cc110b04cc2cda52e668e62ea8e0e;hb=1d5472a96cdafb6d0b947d16fd3e5f3ddac8a37b;hp=81e82049cfd6372bd401462375d86fd9fbb100e3;hpb=98b55637d580660d79fad229f9c059fcbf7985c2;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/byterun.h b/byterun.h
index 81e8204..6e559ef 100644
--- a/byterun.h
+++ b/byterun.h
@@ -1,5 +1,5 @@
 /*
- *      Copyright (c) 1996, 1997 Malcolm Beattie
+ *      Copyright (c) 1996-1998 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,17 +15,10 @@ struct bytestream {
     int (*fread)(char *, size_t, size_t, void*);
     void (*freadpv)(U32, void*);
 };
-void freadpv _((U32, void *));
-void byterun _((struct bytestream));
-#else
-void byterun _((FILE *));
 #endif /* INDIRECT_BGET_MACROS */
 
-#ifndef PATCHLEVEL
-#include "patchlevel.h"
-#endif
-#if PATCHLEVEL < 4 || (PATCHLEVEL == 4 && SUBVERSION < 50)
-#define dTHR extern int errno
+#ifndef PERL_OBJECT
+void *bset_obj_store _((void *, I32));
 #endif
 
 enum {
@@ -185,10 +178,9 @@ EXT int optype_size[]
 #endif /* DOINIT */
 ;
 
-EXT SV * specialsv_list[4];
 #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; \
-} STMT_END
+	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