This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
win32: additional default libraries
[perl5.git] / proto.h
CommitLineData
fed7345c 1#ifndef NEXT30_NO_ATTRIBUTE
ecfc5424
AD
2#ifndef HASATTRIBUTE /* disable GNU-cc attribute checking? */
3#ifdef __attribute__ /* Avoid possible redefinition errors */
a0d0e21e 4#undef __attribute__
ecfc5424 5#endif
a0d0e21e 6#define __attribute__(attr)
fed7345c 7#endif
a0d0e21e
LW
8#endif
9#ifdef OVERLOAD
10SV* amagic_call _((SV* left,SV* right,int method,int dir));
44a8e56a 11bool Gv_AMupdate _((HV* stash));
a0d0e21e
LW
12#endif /* OVERLOAD */
13OP* append_elem _((I32 optype, OP* head, OP* tail));
14OP* append_list _((I32 optype, LISTOP* first, LISTOP* last));
15I32 apply _((I32 type, SV** mark, SV** sp));
16void assertref _((OP* op));
17void av_clear _((AV* ar));
18void av_extend _((AV* ar, I32 key));
19AV* av_fake _((I32 size, SV** svp));
20SV** av_fetch _((AV* ar, I32 key, I32 lval));
21void av_fill _((AV* ar, I32 fill));
22I32 av_len _((AV* ar));
23AV* av_make _((I32 size, SV** svp));
24SV* av_pop _((AV* ar));
25void av_push _((AV* ar, SV* val));
26SV* av_shift _((AV* ar));
27SV** av_store _((AV* ar, I32 key, SV* val));
28void av_undef _((AV* ar));
29void av_unshift _((AV* ar, I32 num));
30OP* bind_match _((I32 type, OP* left, OP* pat));
36477c24 31OP* block_end _((I32 floor, OP* seq));
54310121 32I32 block_gimme _((void));
55497cff 33int block_start _((int full));
45b989d7 34void boot_core_UNIVERSAL _((void));
68dc0745 35void call_list _((I32 oldscope, AV* list));
a0d0e21e
LW
36I32 cando _((I32 bit, I32 effective, struct stat* statbufp));
37#ifndef CASTNEGFLOAT
38U32 cast_ulong _((double f));
39#endif
40#if !defined(HAS_TRUNCATE) && !defined(HAS_CHSIZE) && defined(F_FREESP)
45b989d7 41I32 my_chsize _((int fd, Off_t length));
a0d0e21e 42#endif
46fc3d4c 43OP* ck_gvconst _((OP* o));
44OP* ck_retarget _((OP* op));
a0d0e21e 45OP* convert _((I32 optype, I32 flags, OP* op));
fc36a67e 46void croak _((const char* pat,...)) __attribute__((noreturn));
3fe9a6f1 47void cv_ckproto _((CV* cv, GV* gv, char* p));
748a9306 48CV* cv_clone _((CV* proto));
760ac839 49SV* cv_const_sv _((CV* cv));
3fe9a6f1 50void cv_undef _((CV* cv));
a0d0e21e
LW
51#ifdef DEBUGGING
52void cx_dump _((CONTEXT* cs));
53#endif
46fc3d4c 54SV* filter_add _((filter_t funcp, SV* datasv));
16d20bd9 55void filter_del _((filter_t funcp));
46fc3d4c 56I32 filter_read _((int idx, SV* buffer, int maxlen));
a0d0e21e 57I32 cxinc _((void));
71be2cbc 58void deb _((const char* pat,...)) __attribute__((format(printf,1,2)));
a0d0e21e
LW
59void deb_growlevel _((void));
60I32 debop _((OP* op));
61I32 debstackptrs _((void));
62#ifdef DEBUGGING
63void debprofdump _((void));
64#endif
65I32 debstack _((void));
fc36a67e 66char* delimcpy _((char* to, char* toend, char* from, char* fromend,
67 int delim, I32* retlen));
a0d0e21e 68void deprecate _((char* s));
fc36a67e 69OP* die _((const char* pat,...));
a0d0e21e
LW
70OP* die_where _((char* message));
71void dounwind _((I32 cxix));
72bool do_aexec _((SV* really, SV** mark, SV** sp));
73void do_chop _((SV* asv, SV* sv));
45b989d7 74bool do_close _((GV* gv, bool not_implicit));
a0d0e21e
LW
75bool do_eof _((GV* gv));
76bool do_exec _((char* cmd));
77void do_execfree _((void));
78#if defined(HAS_MSG) || defined(HAS_SEM) || defined(HAS_SHM)
79I32 do_ipcctl _((I32 optype, SV** mark, SV** sp));
80I32 do_ipcget _((I32 optype, SV** mark, SV** sp));
81#endif
82void do_join _((SV* sv, SV* del, SV** mark, SV** sp));
83OP* do_kv _((void));
84#if defined(HAS_MSG) || defined(HAS_SEM) || defined(HAS_SHM)
85I32 do_msgrcv _((SV** mark, SV** sp));
86I32 do_msgsnd _((SV** mark, SV** sp));
87#endif
c07a80fd 88bool do_open _((GV* gv, char* name, I32 len,
760ac839 89 int as_raw, int rawmode, int rawperm, PerlIO* supplied_fp));
a0d0e21e 90void do_pipe _((SV* sv, GV* rgv, GV* wgv));
760ac839 91bool do_print _((SV* sv, PerlIO* fp));
46fc3d4c 92OP* do_readline _((void));
a0d0e21e
LW
93I32 do_chomp _((SV* sv));
94bool do_seek _((GV* gv, long pos, int whence));
95#if defined(HAS_MSG) || defined(HAS_SEM) || defined(HAS_SHM)
96I32 do_semop _((SV** mark, SV** sp));
97I32 do_shmio _((I32 optype, SV** mark, SV** sp));
98#endif
99void do_sprintf _((SV* sv, I32 len, SV** sarg));
8903cb82 100long do_sysseek _((GV* gv, long pos, int whence));
a0d0e21e
LW
101long do_tell _((GV* gv));
102I32 do_trans _((SV* sv, OP* arg));
103void do_vecset _((SV* sv));
104void do_vop _((I32 optype, SV* sv, SV* left, SV* right));
e50aee73 105I32 dowantarray _((void));
a0d0e21e
LW
106void dump_all _((void));
107void dump_eval _((void));
748a9306 108#ifdef DUMP_FDS /* See util.c */
a0d0e21e
LW
109int dump_fds _((char* s));
110#endif
111void dump_form _((GV* gv));
112void dump_gv _((GV* gv));
8eccb90b 113#ifdef MYMALLOC
c07a80fd 114void dump_mstats _((char* s));
8eccb90b 115#endif
a0d0e21e
LW
116void dump_op _((OP* arg));
117void dump_pm _((PMOP* pm));
118void dump_packsubs _((HV* stash));
119void dump_sub _((GV* gv));
bbce6d69 120void fbm_compile _((SV* sv));
a0d0e21e
LW
121char* fbm_instr _((unsigned char* big, unsigned char* bigend, SV* littlesv));
122OP* force_list _((OP* arg));
46fc3d4c 123OP* fold_constants _((OP* arg));
124char* form _((const char* pat, ...));
a0d0e21e
LW
125void free_tmps _((void));
126OP* gen_constant_list _((OP* op));
127void gp_free _((GV* gv));
128GP* gp_ref _((GP* gp));
129GV* gv_AVadd _((GV* gv));
130GV* gv_HVadd _((GV* gv));
131GV* gv_IOadd _((GV* gv));
54310121 132GV* gv_autoload4 _((HV* stash, char* name, STRLEN len, I32 method));
a0d0e21e 133void gv_check _((HV* stash));
ab4ed645 134void gv_efullname _((SV* sv, GV* gv));
135void gv_efullname3 _((SV* sv, GV* gv, char* prefix));
a0d0e21e
LW
136GV* gv_fetchfile _((char* name));
137GV* gv_fetchmeth _((HV* stash, char* name, STRLEN len, I32 level));
138GV* gv_fetchmethod _((HV* stash, char* name));
dc848c6f 139GV* gv_fetchmethod_autoload _((HV* stash, char* name, I32 autoload));
a0d0e21e 140GV* gv_fetchpv _((char* name, I32 add, I32 sv_type));
ab4ed645 141void gv_fullname _((SV* sv, GV* gv));
142void gv_fullname3 _((SV* sv, GV* gv, char* prefix));
46fc3d4c 143void gv_init _((GV* gv, HV* stash, char* name, STRLEN len, int multi));
a0d0e21e 144HV* gv_stashpv _((char* name, I32 create));
45b989d7 145HV* gv_stashpvn _((char* name, U32 namelen, I32 create));
a0d0e21e 146HV* gv_stashsv _((SV* sv, I32 create));
a0d0e21e
LW
147void hoistmust _((PMOP* pm));
148void hv_clear _((HV* tb));
68dc0745 149void hv_delayfree_ent _((HV* hv, HE* entry));
748a9306 150SV* hv_delete _((HV* tb, char* key, U32 klen, I32 flags));
45b989d7 151SV* hv_delete_ent _((HV* tb, SV* key, I32 flags, U32 hash));
a0d0e21e 152bool hv_exists _((HV* tb, char* key, U32 klen));
45b989d7 153bool hv_exists_ent _((HV* tb, SV* key, U32 hash));
a0d0e21e 154SV** hv_fetch _((HV* tb, char* key, U32 klen, I32 lval));
45b989d7 155HE* hv_fetch_ent _((HV* tb, SV* key, I32 lval, U32 hash));
68dc0745 156void hv_free_ent _((HV* hv, HE* entry));
a0d0e21e
LW
157I32 hv_iterinit _((HV* tb));
158char* hv_iterkey _((HE* entry, I32* retlen));
45b989d7 159SV* hv_iterkeysv _((HE* entry));
a0d0e21e 160HE* hv_iternext _((HV* tb));
45b989d7 161SV* hv_iternextsv _((HV* hv, char** key, I32* retlen));
a0d0e21e 162SV* hv_iterval _((HV* tb, HE* entry));
ab4ed645 163void hv_ksplit _((HV* hv, IV newmax));
a0d0e21e
LW
164void hv_magic _((HV* hv, GV* gv, int how));
165SV** hv_store _((HV* tb, char* key, U32 klen, SV* val, U32 hash));
45b989d7 166HE* hv_store_ent _((HV* tb, SV* key, SV* val, U32 hash));
a0d0e21e 167void hv_undef _((HV* tb));
bbce6d69 168I32 ibcmp _((char* a, char* b, I32 len));
169I32 ibcmp_locale _((char* a, char* b, I32 len));
a0d0e21e 170I32 ingroup _((I32 testgid, I32 effective));
bbce6d69 171U32 intro_my _((void));
a0d0e21e 172char* instr _((char* big, char* little));
8eccb90b 173bool io_close _((IO* io));
a0d0e21e
LW
174OP* invert _((OP* cmd));
175OP* jmaybe _((OP* arg));
176I32 keyword _((char* d, I32 len));
177void leave_scope _((I32 base));
178void lex_end _((void));
46fc3d4c 179void lex_start _((SV* line));
a0d0e21e
LW
180OP* linklist _((OP* op));
181OP* list _((OP* o));
182OP* listkids _((OP* o));
183OP* localize _((OP* arg, I32 lexical));
184I32 looks_like_number _((SV* sv));
185int magic_clearenv _((SV* sv, MAGIC* mg));
66b1d557 186int magic_clear_all_env _((void));
a0d0e21e 187int magic_clearpack _((SV* sv, MAGIC* mg));
45b989d7 188int magic_clearsig _((SV* sv, MAGIC* mg));
5f05dabc 189int magic_existspack _((SV* sv, MAGIC* mg));
68dc0745 190int magic_freedefelem _((SV* sv, MAGIC* mg));
a0d0e21e
LW
191int magic_get _((SV* sv, MAGIC* mg));
192int magic_getarylen _((SV* sv, MAGIC* mg));
68dc0745 193int magic_getdefelem _((SV* sv, MAGIC* mg));
a0d0e21e 194int magic_getglob _((SV* sv, MAGIC* mg));
68dc0745 195int magic_getpack _((SV* sv, MAGIC* mg));
a0d0e21e 196int magic_getpos _((SV* sv, MAGIC* mg));
45b989d7 197int magic_getsig _((SV* sv, MAGIC* mg));
a0d0e21e
LW
198int magic_gettaint _((SV* sv, MAGIC* mg));
199int magic_getuvar _((SV* sv, MAGIC* mg));
200U32 magic_len _((SV* sv, MAGIC* mg));
201int magic_nextpack _((SV* sv, MAGIC* mg, SV* key));
202int magic_set _((SV* sv, MAGIC* mg));
203#ifdef OVERLOAD
204int magic_setamagic _((SV* sv, MAGIC* mg));
205#endif /* OVERLOAD */
206int magic_setarylen _((SV* sv, MAGIC* mg));
207int magic_setbm _((SV* sv, MAGIC* mg));
208int magic_setdbline _((SV* sv, MAGIC* mg));
44a8e56a 209#ifdef USE_LOCALE_COLLATE
bbce6d69 210int magic_setcollxfrm _((SV* sv, MAGIC* mg));
44a8e56a 211#endif
68dc0745 212int magic_setdefelem _((SV* sv, MAGIC* mg));
a0d0e21e 213int magic_setenv _((SV* sv, MAGIC* mg));
55497cff 214int magic_setfm _((SV* sv, MAGIC* mg));
a0d0e21e
LW
215int magic_setisa _((SV* sv, MAGIC* mg));
216int magic_setglob _((SV* sv, MAGIC* mg));
217int magic_setmglob _((SV* sv, MAGIC* mg));
ab4ed645 218int magic_setnkeys _((SV* sv, MAGIC* mg));
a0d0e21e
LW
219int magic_setpack _((SV* sv, MAGIC* mg));
220int magic_setpos _((SV* sv, MAGIC* mg));
221int magic_setsig _((SV* sv, MAGIC* mg));
222int magic_setsubstr _((SV* sv, MAGIC* mg));
223int magic_settaint _((SV* sv, MAGIC* mg));
224int magic_setuvar _((SV* sv, MAGIC* mg));
225int magic_setvec _((SV* sv, MAGIC* mg));
226int magic_wipepack _((SV* sv, MAGIC* mg));
227void magicname _((char* sym, char* name, I32 namlen));
228int main _((int argc, char** argv, char** env));
a0d0e21e 229void markstack_grow _((void));
5f05dabc 230#ifdef USE_LOCALE_COLLATE
46fc3d4c 231char* mem_collxfrm _((const char* s, STRLEN len, STRLEN* xlen));
5f05dabc 232#endif
71be2cbc 233char* mess _((const char* pat, va_list* args));
a0d0e21e 234int mg_clear _((SV* sv));
46fc3d4c 235int mg_copy _((SV* , SV* , char* , I32));
a0d0e21e
LW
236MAGIC* mg_find _((SV* sv, int type));
237int mg_free _((SV* sv));
238int mg_get _((SV* sv));
239U32 mg_len _((SV* sv));
240void mg_magical _((SV* sv));
241int mg_set _((SV* sv));
242OP* mod _((OP* op, I32 type));
243char* moreswitches _((char* s));
46fc3d4c 244OP* my _((OP* op));
5f05dabc 245#if !defined(HAS_BCOPY) || !defined(HAS_SAFE_BCOPY)
a0d0e21e 246char* my_bcopy _((char* from, char* to, I32 len));
5f05dabc 247#endif
a0d0e21e
LW
248#if !defined(HAS_BZERO) && !defined(HAS_MEMSET)
249char* my_bzero _((char* loc, I32 len));
85e6fe83 250#endif
748a9306 251void my_exit _((U32 status)) __attribute__((noreturn));
f86702cc 252void my_failure_exit _((void)) __attribute__((noreturn));
a0d0e21e 253I32 my_lstat _((void));
5f05dabc 254#if !defined(HAS_MEMCMP) || !defined(HAS_SANE_MEMCMP)
36477c24 255I32 my_memcmp _((char* s1, char* s2, I32 len));
a0d0e21e 256#endif
fc36a67e 257#if !defined(HAS_MEMSET)
258void* my_memset _((char* loc, I32 ch, I32 len));
259#endif
760ac839
LW
260I32 my_pclose _((PerlIO* ptr));
261PerlIO* my_popen _((char* cmd, char* mode));
a0d0e21e
LW
262void my_setenv _((char* nam, char* val));
263I32 my_stat _((void));
264#ifdef MYSWAP
265short my_swap _((short s));
748a9306
LW
266long my_htonl _((long l));
267long my_ntohl _((long l));
a0d0e21e
LW
268#endif
269void my_unexec _((void));
270OP* newANONLIST _((OP* op));
271OP* newANONHASH _((OP* op));
4633a7c4 272OP* newANONSUB _((I32 floor, OP* proto, OP* block));
a0d0e21e 273OP* newASSIGNOP _((I32 flags, OP* left, I32 optype, OP* right));
1aef975c 274OP* newCONDOP _((I32 flags, OP* expr, OP* trueop, OP* falseop));
a0d0e21e
LW
275void newFORM _((I32 floor, OP* op, OP* block));
276OP* newFOROP _((I32 flags, char* label, line_t forline, OP* scalar, OP* expr, OP*block, OP*cont));
277OP* newLOGOP _((I32 optype, I32 flags, OP* left, OP* right));
278OP* newLOOPEX _((I32 type, OP* label));
279OP* newLOOPOP _((I32 flags, I32 debuggable, OP* expr, OP* block));
a0d0e21e
LW
280OP* newNULLLIST _((void));
281OP* newOP _((I32 optype, I32 flags));
282void newPROG _((OP* op));
283OP* newRANGE _((I32 flags, OP* left, OP* right));
284OP* newSLICEOP _((I32 flags, OP* subscript, OP* list));
285OP* newSTATEOP _((I32 flags, char* label, OP* o));
4633a7c4 286CV* newSUB _((I32 floor, OP* op, OP* proto, OP* block));
46fc3d4c 287CV* newXS _((char* name, void (*subaddr)(CV* cv), char* filename));
a0d0e21e 288#ifdef DEPRECATED
46fc3d4c 289CV* newXSUB _((char* name, I32 ix, I32 (*subaddr)(int,int,int), char* filename));
a0d0e21e
LW
290#endif
291AV* newAV _((void));
292OP* newAVREF _((OP* o));
293OP* newBINOP _((I32 type, I32 flags, OP* first, OP* last));
c07a80fd 294OP* newCVREF _((I32 flags, OP* o));
a0d0e21e 295OP* newGVOP _((I32 type, I32 flags, GV* gv));
46fc3d4c 296GV* newGVgen _((char* pack));
a0d0e21e
LW
297OP* newGVREF _((I32 type, OP* o));
298OP* newHVREF _((OP* o));
299HV* newHV _((void));
300IO* newIO _((void));
301OP* newLISTOP _((I32 type, I32 flags, OP* first, OP* last));
302OP* newPMOP _((I32 type, I32 flags));
303OP* newPVOP _((I32 type, I32 flags, char* pv));
304SV* newRV _((SV* ref));
79072805 305#ifdef LEAKTEST
a0d0e21e 306SV* newSV _((I32 x, STRLEN len));
79072805 307#else
a0d0e21e 308SV* newSV _((STRLEN len));
79072805 309#endif
a0d0e21e
LW
310OP* newSVREF _((OP* o));
311OP* newSVOP _((I32 type, I32 flags, SV* sv));
312SV* newSViv _((IV i));
313SV* newSVnv _((double n));
314SV* newSVpv _((char* s, STRLEN len));
46fc3d4c 315SV* newSVpvf _((const char* pat, ...));
a0d0e21e
LW
316SV* newSVrv _((SV* rv, char* classname));
317SV* newSVsv _((SV* old));
318OP* newUNOP _((I32 type, I32 flags, OP* first));
46fc3d4c 319OP* newWHILEOP _((I32 flags, I32 debuggable, LOOP* loop, OP* expr, OP* block, OP* cont));
760ac839 320PerlIO* nextargv _((GV* gv));
a0d0e21e 321char* ninstr _((char* big, char* bigend, char* little, char* lend));
46fc3d4c 322OP* oopsCV _((OP* o));
a0d0e21e
LW
323void op_free _((OP* arg));
324void package _((OP* op));
325PADOFFSET pad_alloc _((I32 optype, U32 tmptype));
326PADOFFSET pad_allocmy _((char* name));
327PADOFFSET pad_findmy _((char* name));
328OP* oopsAV _((OP* o));
329OP* oopsHV _((OP* o));
330void pad_leavemy _((I32 fill));
331SV* pad_sv _((PADOFFSET po));
332void pad_free _((PADOFFSET po));
333void pad_reset _((void));
334void pad_swipe _((PADOFFSET po));
335void peep _((OP* op));
336PerlInterpreter* perl_alloc _((void));
337I32 perl_call_argv _((char* subname, I32 flags, char** argv));
338I32 perl_call_method _((char* methname, I32 flags));
339I32 perl_call_pv _((char* subname, I32 flags));
340I32 perl_call_sv _((SV* sv, I32 flags));
a0d0e21e 341void perl_construct _((PerlInterpreter* sv_interp));
748a9306 342void perl_destruct _((PerlInterpreter* sv_interp));
137443ea 343SV* perl_eval_pv _((char* p, I32 croak_on_error));
4633a7c4 344I32 perl_eval_sv _((SV* sv, I32 flags));
a0d0e21e
LW
345void perl_free _((PerlInterpreter* sv_interp));
346SV* perl_get_sv _((char* name, I32 create));
347AV* perl_get_av _((char* name, I32 create));
348HV* perl_get_hv _((char* name, I32 create));
349CV* perl_get_cv _((char* name, I32 create));
45b989d7 350int perl_init_i18nl10n _((int printwarn));
bbce6d69 351int perl_init_i18nl14n _((int printwarn));
46fc3d4c 352void perl_new_collate _((char* newcoll));
353void perl_new_ctype _((char* newctype));
354void perl_new_numeric _((char* newcoll));
36477c24 355void perl_set_numeric_local _((void));
356void perl_set_numeric_standard _((void));
a0d0e21e 357int perl_parse _((PerlInterpreter* sv_interp, void(*xsinit)(void), int argc, char** argv, char** env));
4633a7c4
LW
358void perl_require_pv _((char* pv));
359#define perl_requirepv perl_require_pv
a0d0e21e
LW
360int perl_run _((PerlInterpreter* sv_interp));
361void pidgone _((int pid, int status));
362void pmflag _((U16* pmfl, int ch));
363OP* pmruntime _((OP* pm, OP* expr, OP* repl));
364OP* pmtrans _((OP* op, OP* expr, OP* repl));
365OP* pop_return _((void));
366void pop_scope _((void));
367OP* prepend_elem _((I32 optype, OP* head, OP* tail));
368void push_return _((OP* op));
369void push_scope _((void));
e50aee73 370regexp* pregcomp _((char* exp, char* xend, PMOP* pm));
a0d0e21e
LW
371OP* ref _((OP* op, I32 type));
372OP* refkids _((OP* op, I32 type));
373void regdump _((regexp* r));
e50aee73
AD
374I32 pregexec _((regexp* prog, char* stringarg, char* strend, char* strbeg, I32 minend, SV* screamer, I32 safebase));
375void pregfree _((struct regexp* r));
a0d0e21e 376char* regnext _((char* p));
46fc3d4c 377void regprop _((SV* sv, char* op));
a0d0e21e
LW
378void repeatcpy _((char* to, char* from, I32 len, I32 count));
379char* rninstr _((char* big, char* bigend, char* little, char* lend));
ff68c719 380Sighandler_t rsignal _((int, Sighandler_t));
381int rsignal_restore _((int, Sigsave_t*));
382int rsignal_save _((int, Sighandler_t, Sigsave_t*));
383Sighandler_t rsignal_state _((int));
8da795c6 384int runops _((void));
c90c0ff4 385void rxres_free _((void** rsp));
386void rxres_restore _((void** rsp, REGEXP* rx));
387void rxres_save _((void** rsp, REGEXP* rx));
a0d0e21e
LW
388#ifndef HAS_RENAME
389I32 same_dirent _((char* a, char* b));
390#endif
391char* savepv _((char* sv));
392char* savepvn _((char* sv, I32 len));
393void savestack_grow _((void));
394void save_aptr _((AV** aptr));
395AV* save_ary _((GV* gv));
396void save_clearsv _((SV** svp));
397void save_delete _((HV* hv, char* key, I32 klen));
398#ifndef titan /* TitanOS cc can't handle this */
399void save_destructor _((void (*f)(void*), void* p));
400#endif /* titan */
401void save_freesv _((SV* sv));
402void save_freeop _((OP* op));
403void save_freepv _((char* pv));
5f05dabc 404void save_gp _((GV* gv, I32 empty));
a0d0e21e
LW
405HV* save_hash _((GV* gv));
406void save_hptr _((HV** hptr));
55497cff 407void save_I16 _((I16* intp));
a0d0e21e
LW
408void save_I32 _((I32* intp));
409void save_int _((int* intp));
410void save_item _((SV* item));
55497cff 411void save_iv _((IV* iv));
a0d0e21e 412void save_list _((SV** sarg, I32 maxsarg));
46fc3d4c 413void save_long _((long* longp));
a0d0e21e
LW
414void save_nogv _((GV* gv));
415SV* save_scalar _((GV* gv));
46fc3d4c 416void save_pptr _((char** pptr));
a0d0e21e
LW
417void save_sptr _((SV** sptr));
418SV* save_svref _((SV** sptr));
419OP* sawparens _((OP* o));
420OP* scalar _((OP* o));
421OP* scalarkids _((OP* op));
422OP* scalarseq _((OP* o));
423OP* scalarvoid _((OP* op));
55497cff 424UV scan_hex _((char* start, I32 len, I32* retlen));
a0d0e21e 425char* scan_num _((char* s));
55497cff 426UV scan_oct _((char* start, I32 len, I32* retlen));
a0d0e21e
LW
427OP* scope _((OP* o));
428char* screaminstr _((SV* bigsv, SV* littlesv));
429#ifndef VMS
430I32 setenv_getix _((char* nam));
85e6fe83 431#endif
46fc3d4c 432void setdefout _((GV* gv));
71be2cbc 433char* sharepvn _((char* sv, I32 len, U32 hash));
434HEK* share_hek _((char* sv, I32 len, U32 hash));
ecfc5424 435Signal_t sighandler _((int sig));
a0d0e21e 436SV** stack_grow _((SV** sp, SV**p, int n));
ba6d6ac9 437I32 start_subparse _((I32 is_format, U32 flags));
44a8e56a 438void sub_crush_depth _((CV* cv));
a0d0e21e
LW
439bool sv_2bool _((SV* sv));
440CV* sv_2cv _((SV* sv, HV** st, GV** gvp, I32 lref));
441IO* sv_2io _((SV* sv));
442IV sv_2iv _((SV* sv));
443SV* sv_2mortal _((SV* sv));
444double sv_2nv _((SV* sv));
445char* sv_2pv _((SV* sv, STRLEN* lp));
ff68c719 446UV sv_2uv _((SV* sv));
4633a7c4 447void sv_add_arena _((char* ptr, U32 size, U32 flags));
a0d0e21e
LW
448int sv_backoff _((SV* sv));
449SV* sv_bless _((SV* sv, HV* stash));
46fc3d4c 450void sv_catpvf _((SV* sv, const char* pat, ...));
a0d0e21e
LW
451void sv_catpv _((SV* sv, char* ptr));
452void sv_catpvn _((SV* sv, char* ptr, STRLEN len));
453void sv_catsv _((SV* dsv, SV* ssv));
454void sv_chop _((SV* sv, char* ptr));
455void sv_clean_all _((void));
456void sv_clean_objs _((void));
457void sv_clear _((SV* sv));
458I32 sv_cmp _((SV* sv1, SV* sv2));
bbce6d69 459I32 sv_cmp_locale _((SV* sv1, SV* sv2));
5f05dabc 460#ifdef USE_LOCALE_COLLATE
bbce6d69 461char* sv_collxfrm _((SV* sv, STRLEN* nxp));
5f05dabc 462#endif
a0d0e21e
LW
463void sv_dec _((SV* sv));
464void sv_dump _((SV* sv));
55497cff 465bool sv_derived_from _((SV* sv, char* name));
a0d0e21e
LW
466I32 sv_eq _((SV* sv1, SV* sv2));
467void sv_free _((SV* sv));
4633a7c4 468void sv_free_arenas _((void));
760ac839 469char* sv_gets _((SV* sv, PerlIO* fp, I32 append));
93a17b20 470#ifndef DOSISH
a0d0e21e 471char* sv_grow _((SV* sv, I32 newlen));
93a17b20 472#else
a0d0e21e 473char* sv_grow _((SV* sv, unsigned long newlen));
93a17b20 474#endif
a0d0e21e
LW
475void sv_inc _((SV* sv));
476void sv_insert _((SV* bigsv, STRLEN offset, STRLEN len, char* little, STRLEN littlelen));
477int sv_isa _((SV* sv, char* name));
478int sv_isobject _((SV* sv));
479STRLEN sv_len _((SV* sv));
480void sv_magic _((SV* sv, SV* obj, int how, char* name, I32 namlen));
481SV* sv_mortalcopy _((SV* oldsv));
482SV* sv_newmortal _((void));
483SV* sv_newref _((SV* sv));
46fc3d4c 484char* sv_peek _((SV* sv));
485char* sv_pvn_force _((SV* sv, STRLEN* lp));
a0d0e21e
LW
486char* sv_reftype _((SV* sv, int ob));
487void sv_replace _((SV* sv, SV* nsv));
488void sv_report_used _((void));
489void sv_reset _((char* s, HV* stash));
46fc3d4c 490void sv_setpvf _((SV* sv, const char* pat, ...));
a0d0e21e 491void sv_setiv _((SV* sv, IV num));
55497cff 492void sv_setuv _((SV* sv, UV num));
a0d0e21e 493void sv_setnv _((SV* sv, double num));
46fc3d4c 494SV* sv_setref_iv _((SV* rv, char* classname, IV iv));
495SV* sv_setref_nv _((SV* rv, char* classname, double nv));
496SV* sv_setref_pv _((SV* rv, char* classname, void* pv));
497SV* sv_setref_pvn _((SV* rv, char* classname, char* pv, I32 n));
71be2cbc 498void sv_setpv _((SV* sv, const char* ptr));
499void sv_setpvn _((SV* sv, const char* ptr, STRLEN len));
a0d0e21e 500void sv_setsv _((SV* dsv, SV* ssv));
bbce6d69 501void sv_taint _((SV* sv));
502bool sv_tainted _((SV* sv));
a0d0e21e
LW
503int sv_unmagic _((SV* sv, int type));
504void sv_unref _((SV* sv));
bbce6d69 505void sv_untaint _((SV* sv));
a0d0e21e
LW
506bool sv_upgrade _((SV* sv, U32 mt));
507void sv_usepvn _((SV* sv, char* ptr, STRLEN len));
46fc3d4c 508void sv_vcatpvfn _((SV* sv, const char* pat, STRLEN patlen,
509 va_list* args, SV** svargs, I32 svmax,
510 bool *used_locale));
511void sv_vsetpvfn _((SV* sv, const char* pat, STRLEN patlen,
512 va_list* args, SV** svargs, I32 svmax,
513 bool *used_locale));
a0d0e21e 514void taint_env _((void));
71be2cbc 515void taint_proper _((const char* f, char* s));
16d20bd9 516#ifdef UNLINK_ALL_VERSIONS
a0d0e21e 517I32 unlnk _((char* f));
16d20bd9 518#endif
71be2cbc 519void unsharepvn _((char* sv, I32 len, U32 hash));
520void unshare_hek _((HEK* hek));
45b989d7 521void utilize _((int aver, I32 floor, OP* version, OP* id, OP* arg));
68dc0745 522void vivify_defelem _((SV* sv));
523void vivify_ref _((SV* sv, U32 to_what));
a0d0e21e 524I32 wait4pid _((int pid, int* statusp, int flags));
fc36a67e 525void warn _((const char* pat,...));
46fc3d4c 526void watch _((char** addr));
a0d0e21e
LW
527I32 whichsig _((char* sig));
528int yyerror _((char* s));
529int yylex _((void));
530int yyparse _((void));
531int yywarn _((char* s));
55497cff 532
533#if defined(MYMALLOC) || !defined(STANDARD_C)
534Malloc_t malloc _((MEM_SIZE nbytes));
535Malloc_t calloc _((MEM_SIZE elements, MEM_SIZE size));
536Malloc_t realloc _((Malloc_t where, MEM_SIZE nbytes));
537Free_t free _((Malloc_t where));
538#endif
539
bbce6d69 540#ifndef MYMALLOC
541Malloc_t safemalloc _((MEM_SIZE nbytes));
542Malloc_t safecalloc _((MEM_SIZE elements, MEM_SIZE size));
543Malloc_t saferealloc _((Malloc_t where, MEM_SIZE nbytes));
544Free_t safefree _((Malloc_t where));
545#endif
546
55497cff 547#ifdef LEAKTEST
548Malloc_t safexmalloc _((I32 x, MEM_SIZE size));
549Malloc_t safexcalloc _((I32 x, MEM_SIZE elements, MEM_SIZE size));
550Malloc_t safexrealloc _((Malloc_t where, MEM_SIZE size));
551void safexfree _((Malloc_t where));
552#endif