phase 2 of PERL_OBJECT cleanup; objXSUB.h autogeneration

[p5sagit/p5-mst-13.2.git] / proto.h

diff --git a/proto.h b/proto.h
index fab5250..a770485 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -361,7 +361,7 @@ VIRTUAL OP* newNULLLIST _((void));
 VIRTUAL OP*    newOP _((I32 optype, I32 flags));
 VIRTUAL void   newPROG _((OP* o));
 VIRTUAL OP*    newRANGE _((I32 flags, OP* left, OP* right));
-VIRTUAL OP*    newSLICEOP _((I32 flags, OP* subscript, OP* list));
+VIRTUAL OP*    newSLICEOP _((I32 flags, OP* subscript, OP* listop));
 VIRTUAL OP*    newSTATEOP _((I32 flags, char* label, OP* o));
 VIRTUAL CV*    newSUB _((I32 floor, OP* o, OP* proto, OP* block));
 VIRTUAL CV*    newXS _((char* name, void (*subaddr)(CV* cv _CPERLproto), char* filename));
@@ -943,6 +943,8 @@ VIRTUAL void        sv_setpvn_mg _((SV *sv, const char *ptr, STRLEN len));
 VIRTUAL void   sv_setsv_mg _((SV *dstr, SV *sstr));
 VIRTUAL void   sv_usepvn_mg _((SV *sv, char *ptr, STRLEN len));
 
+VIRTUAL MGVTBL*        get_vtbl _((int vtbl_id));
+
 /* New virtual functions must be added here to maintain binary
  * compatablity with PERL_OBJECT
  */