Quickier thread-specific data on OS/2

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

diff --git a/proto.h b/proto.h
index 0b1c962..61e5fa0 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -91,7 +91,7 @@ VIRTUAL char* delimcpy _((char* to, char* toend, char* from, char* fromend,
                    int delim, I32* retlen));
 VIRTUAL void   deprecate _((char* s));
 VIRTUAL OP*    die _((const char* pat,...));
-VIRTUAL OP*    die_where _((char* message));
+VIRTUAL OP*    die_where _((char* message, STRLEN msglen));
 VIRTUAL void   dounwind _((I32 cxix));
 VIRTUAL bool   do_aexec _((SV* really, SV** mark, SV** sp));
 VIRTUAL int    do_binmode _((PerlIO *fp, int iotype, int flag));
@@ -154,6 +154,9 @@ VIRTUAL OP* fold_constants _((OP* arg));
 VIRTUAL char*  form _((const char* pat, ...));
 VIRTUAL void   free_tmps _((void));
 VIRTUAL OP*    gen_constant_list _((OP* o));
+#ifndef HAS_GETENV_SV
+VIRTUAL SV*    getenv_sv _((char* key));
+#endif
 VIRTUAL void   gp_free _((GV* gv));
 VIRTUAL GP*    gp_ref _((GP* gp));
 VIRTUAL GV*    gv_AVadd _((GV* gv));
@@ -302,7 +305,7 @@ VIRTUAL void        markstack_grow _((void));
 #ifdef USE_LOCALE_COLLATE
 VIRTUAL char*  mem_collxfrm _((const char* s, STRLEN len, STRLEN* xlen));
 #endif
-VIRTUAL char*  mess _((const char* pat, va_list* args));
+VIRTUAL SV*    mess _((const char* pat, va_list* args));
 VIRTUAL int    mg_clear _((SV* sv));
 VIRTUAL int    mg_copy _((SV* sv, SV* nsv, const char* key, I32 klen));
 VIRTUAL MAGIC* mg_find _((SV* sv, int type));
@@ -715,7 +718,6 @@ void del_xiv _((XPVIV* p));
 void del_xnv _((XPVNV* p));
 void del_xpv _((XPV* p));
 void del_xrv _((XRV* p));
-void sv_mortalgrow _((void));
 void sv_unglob _((SV* sv));
 I32 avhv_index_sv _((SV* sv));
 
@@ -750,6 +752,7 @@ I32 dopoptosub _((I32 startingblock));
 I32 dopoptosub_at _((PERL_CONTEXT* cxstk, I32 startingblock));
 void save_lines _((AV *array, SV *sv));
 OP *doeval _((int gimme, OP** startop));
+PerlIO *doopen _((const char *name, const char *mode));
 I32 sv_ncmp _((SV *a, SV *b));
 I32 sv_i_ncmp _((SV *a, SV *b));
 I32 amagic_ncmp _((SV *a, SV *b));
@@ -967,3 +970,5 @@ VIRTUAL void reginitcolors _((void));
 VIRTUAL char* sv_2pv_nolen _((SV* sv));
 VIRTUAL char* sv_pv _((SV *sv));
 VIRTUAL void sv_force_normal _((SV *sv));
+VIRTUAL void tmps_grow _((I32 n));
+