From: Dan Sugalski <dan@sidhe.org>
Date: Mon, 1 Jun 1998 12:22:29 +0000 (-0700)
Subject: proto.h change to make byterun() visible to VMS
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1a90ebb26de2937caa136742405b39f6e96453d4;p=p5sagit%2Fp5-mst-13.2.git

proto.h change to make byterun() visible to VMS

	Message-Id: <3.0.5.32.19980601122229.00a58420@ous.edu>

p4raw-id: //depot/perl@1091
---

diff --git a/proto.h b/proto.h
index 093bc1e..083290c 100644
--- a/proto.h
+++ b/proto.h
@@ -836,12 +836,6 @@ void *bset_obj_store _((void *obj, I32 ix));
 OP *new_logop _((I32 type, I32 flags, OP **firstp, OP **otherp));
 
 #define PPDEF(s) OP* CPerlObj::s _((ARGSproto));
-public:
-#ifdef INDIRECT_BGET_MACROS
-VIRTUAL void byterun _((struct bytestream bs));
-#else
-VIRTUAL void byterun _((PerlIO *fp));
-#endif /* INDIRECT_BGET_MACROS */
 
 PPDEF(pp_aassign)
 PPDEF(pp_abs)
@@ -1237,3 +1231,12 @@ VIRTUAL int&	ErrorNo _((void));
 END_EXTERN_C
 #endif	/* PERL_OBJECT */
 
+#ifdef PERL_OBJECT
+public:
+#endif
+#ifdef INDIRECT_BGET_MACROS
+VIRTUAL void byterun _((struct bytestream bs));
+#else
+VIRTUAL void byterun _((PerlIO *fp));
+#endif /* INDIRECT_BGET_MACROS */
+