diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-17 18:39:22 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-17 18:39:22 +0000 |
| commit | edd309b7facc349294ca0ee12a41c07bb525e567 (patch) | |
| tree | ad42446abdab6bba10810e31c14e4feba7c65a18 /proto.h | |
| parent | f272994b1ce9066a01ab0ed3d6c5353b37057838 (diff) | |
| download | perl-edd309b7facc349294ca0ee12a41c07bb525e567.tar.gz | |
Implement the retry-on-ERANGE for the get*_r().
The buffer will keep doubling until 64k.
p4raw-id: //depot/perl@15272
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -599,6 +599,11 @@ PERL_CALLCONV struct perl_thread* Perl_new_struct_thread(pTHX_ struct perl_threa PERL_CALLCONV void Perl_reentrant_size(pTHX); PERL_CALLCONV void Perl_reentrant_init(pTHX); PERL_CALLCONV void Perl_reentrant_free(pTHX); +PERL_CALLCONV void* Perl_reentrant_retry(const char*, ...) +#ifdef CHECK_FORMAT + __attribute__((format(printf,1,2))) +#endif +; #endif PERL_CALLCONV void Perl_call_atexit(pTHX_ ATEXIT_t fn, void *ptr); PERL_CALLCONV I32 Perl_call_argv(pTHX_ const char* sub_name, I32 flags, char** argv); |