[win32] protect sortcop from C<sort { sort { ... } ... } ...>

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

diff --git a/proto.h b/proto.h
index 1b1504e..eb75dc4 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -137,7 +137,7 @@ void        dump_op _((OP* arg));
 void   dump_pm _((PMOP* pm));
 void   dump_packsubs _((HV* stash));
 void   dump_sub _((GV* gv));
-void   fbm_compile _((SV* sv));
+void   fbm_compile _((SV* sv, U32 flags));
 char*  fbm_instr _((unsigned char* big, unsigned char* bigend, SV* littlesv));
 #ifdef USE_THREADS
 PADOFFSET      find_threadsv _((char *name));
@@ -302,6 +302,7 @@ OP* newANONHASH _((OP* o));
 OP*    newANONSUB _((I32 floor, OP* proto, OP* block));
 OP*    newASSIGNOP _((I32 flags, OP* left, I32 optype, OP* right));
 OP*    newCONDOP _((I32 flags, OP* expr, OP* trueop, OP* falseop));
+void   newCONSTSUB _((HV* stash, char* name, SV* sv));
 void   newFORM _((I32 floor, OP* o, OP* block));
 OP*    newFOROP _((I32 flags, char* label, line_t forline, OP* scalar, OP* expr, OP*block, OP*cont));
 OP*    newLOGOP _((I32 optype, I32 flags, OP* left, OP* right));
@@ -352,6 +353,7 @@ OP* newWHILEOP _((I32 flags, I32 debuggable, LOOP* loop,
 #ifdef USE_THREADS
 struct perl_thread *   new_struct_thread _((struct perl_thread *t));
 #endif
+PERL_SI *      new_stackinfo _((I32 stitems, I32 cxitems));
 PerlIO*        nextargv _((GV* gv));
 char*  ninstr _((char* big, char* bigend, char* little, char* lend));
 OP*    oopsCV _((OP* o));
@@ -369,6 +371,7 @@ void        pad_reset _((void));
 void   pad_swipe _((PADOFFSET po));
 void   peep _((OP* o));
 PerlInterpreter*       perl_alloc _((void));
+void    perl_atexit _((void(*fn)(void *), void*));
 I32    perl_call_argv _((char* subname, I32 flags, char** argv));
 I32    perl_call_method _((char* methname, I32 flags));
 I32    perl_call_pv _((char* subname, I32 flags));
@@ -426,6 +429,7 @@ I32 same_dirent _((char* a, char* b));
 char*  savepv _((char* sv));
 char*  savepvn _((char* sv, I32 len));
 void   savestack_grow _((void));
+void   save_aelem _((AV* av, I32 idx, SV **sptr));
 void   save_aptr _((AV** aptr));
 AV*    save_ary _((GV* gv));
 void   save_clearsv _((SV** svp));
@@ -438,6 +442,7 @@ void        save_freeop _((OP* o));
 void   save_freepv _((char* pv));
 void   save_gp _((GV* gv, I32 empty));
 HV*    save_hash _((GV* gv));
+void   save_helem _((HV* hv, SV *key, SV **sptr));
 void   save_hptr _((HV** hptr));
 void   save_I16 _((I16* intp));
 void   save_I32 _((I32* intp));
@@ -490,9 +495,13 @@ void       sv_add_arena _((char* ptr, U32 size, U32 flags));
 int    sv_backoff _((SV* sv));
 SV*    sv_bless _((SV* sv, HV* stash));
 void   sv_catpvf _((SV* sv, const char* pat, ...));
+void   sv_catpvf_mg _((SV* sv, const char* pat, ...));
 void   sv_catpv _((SV* sv, char* ptr));
+void   sv_catpv_mg _((SV* sv, char* ptr));
 void   sv_catpvn _((SV* sv, char* ptr, STRLEN len));
+void   sv_catpvn_mg _((SV* sv, char* ptr, STRLEN len));
 void   sv_catsv _((SV* dsv, SV* ssv));
+void   sv_catsv_mg _((SV* dsv, SV* ssv));
 void   sv_chop _((SV* sv, char* ptr));
 void   sv_clean_all _((void));
 void   sv_clean_objs _((void));
@@ -531,17 +540,25 @@ void      sv_replace _((SV* sv, SV* nsv));
 void   sv_report_used _((void));
 void   sv_reset _((char* s, HV* stash));
 void   sv_setpvf _((SV* sv, const char* pat, ...));
+void   sv_setpvf_mg _((SV* sv, const char* pat, ...));
 void   sv_setiv _((SV* sv, IV num));
+void   sv_setiv_mg _((SV* sv, IV num));
 void   sv_setpviv _((SV* sv, IV num));
+void   sv_setpviv_mg _((SV* sv, IV num));
 void   sv_setuv _((SV* sv, UV num));
+void   sv_setuv_mg _((SV* sv, UV num));
 void   sv_setnv _((SV* sv, double num));
+void   sv_setnv_mg _((SV* sv, double num));
 SV*    sv_setref_iv _((SV* rv, char* classname, IV iv));
 SV*    sv_setref_nv _((SV* rv, char* classname, double nv));
 SV*    sv_setref_pv _((SV* rv, char* classname, void* pv));
 SV*    sv_setref_pvn _((SV* rv, char* classname, char* pv, I32 n));
 void   sv_setpv _((SV* sv, const char* ptr));
+void   sv_setpv_mg _((SV* sv, const char* ptr));
 void   sv_setpvn _((SV* sv, const char* ptr, STRLEN len));
+void   sv_setpvn_mg _((SV* sv, const char* ptr, STRLEN len));
 void   sv_setsv _((SV* dsv, SV* ssv));
+void   sv_setsv_mg _((SV* dsv, SV* ssv));
 void   sv_taint _((SV* sv));
 bool   sv_tainted _((SV* sv));
 int    sv_unmagic _((SV* sv, int type));
@@ -549,6 +566,7 @@ void        sv_unref _((SV* sv));
 void   sv_untaint _((SV* sv));
 bool   sv_upgrade _((SV* sv, U32 mt));
 void   sv_usepvn _((SV* sv, char* ptr, STRLEN len));
+void   sv_usepvn_mg _((SV* sv, char* ptr, STRLEN len));
 void   sv_vcatpvfn _((SV* sv, const char* pat, STRLEN patlen,
                       va_list* args, SV** svargs, I32 svmax,
                       bool *used_locale));