Fix dynamic loading (and argv[0]) under AmigaOS

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

diff --git a/proto.h b/proto.h
index 671c085..9e4f6be 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -29,6 +29,7 @@ void  av_undef _((AV* ar));
 void   av_unshift _((AV* ar, I32 num));
 OP*    bind_match _((I32 type, OP* left, OP* pat));
 OP*    block_end _((I32 floor, OP* seq));
+I32    block_gimme _((void));
 int    block_start _((int full));
 void   boot_core_UNIVERSAL _((void));
 void   call_list _((I32 oldscope, AV* list));
@@ -126,13 +127,14 @@ GP*       gp_ref _((GP* gp));
 GV*    gv_AVadd _((GV* gv));
 GV*    gv_HVadd _((GV* gv));
 GV*    gv_IOadd _((GV* gv));
-GV*    gv_autoload _((HV* stash, char* name, STRLEN len));
+GV*    gv_autoload4 _((HV* stash, char* name, STRLEN len, I32 method));
 void   gv_check _((HV* stash));
 void   gv_efullname _((SV* sv, GV* gv));
 void   gv_efullname3 _((SV* sv, GV* gv, char* prefix));
 GV*    gv_fetchfile _((char* name));
 GV*    gv_fetchmeth _((HV* stash, char* name, STRLEN len, I32 level));
 GV*    gv_fetchmethod _((HV* stash, char* name));
+GV*    gv_fetchmethod_autoload _((HV* stash, char* name, I32 autoload));
 GV*    gv_fetchpv _((char* name, I32 add, I32 sv_type));
 void   gv_fullname _((SV* sv, GV* gv));
 void   gv_fullname3 _((SV* sv, GV* gv, char* prefix));