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));
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));