From 1a90ebb26de2937caa136742405b39f6e96453d4 Mon Sep 17 00:00:00 2001 From: Dan Sugalski Date: Mon, 1 Jun 1998 05:22:29 -0700 Subject: [PATCH] proto.h change to make byterun() visible to VMS Message-Id: <3.0.5.32.19980601122229.00a58420@ous.edu> p4raw-id: //depot/perl@1091 --- proto.h | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) 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 */ + -- 2.7.4