diff options
| author | Brian Ingerson <ingy@ttul.org> | 2001-09-29 10:41:13 -0700 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-30 00:15:38 +0000 |
| commit | 8d344e3e57673a7c678a1daf0c8a5f11c220a8f9 (patch) | |
| tree | d686fa618e8493c8932fab2f95aa604436ad55f5 /proto.h | |
| parent | 9ae8cd5b44680cc8af3d7ecc507f22e5e2031731 (diff) | |
| download | perl-8d344e3e57673a7c678a1daf0c8a5f11c220a8f9.tar.gz | |
Patch to put qsortsv in the public API
Message-ID: <20010929174113.A30223@ttul.org>
p4raw-id: //depot/perl@12276
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -459,6 +459,7 @@ PERL_CALLCONV SV* Perl_mess(pTHX_ const char* pat, ...) ; PERL_CALLCONV SV* Perl_vmess(pTHX_ const char* pat, va_list* args); PERL_CALLCONV void Perl_qerror(pTHX_ SV* err); +PERL_CALLCONV void Perl_sortsv(pTHX_ SV ** array, size_t num_elts, SVCOMPARE_t f); PERL_CALLCONV int Perl_mg_clear(pTHX_ SV* sv); PERL_CALLCONV int Perl_mg_copy(pTHX_ SV* sv, SV* nsv, const char* key, I32 klen); PERL_CALLCONV MAGIC* Perl_mg_find(pTHX_ SV* sv, int type); @@ -1098,7 +1099,6 @@ STATIC I32 S_dopoptosub_at(pTHX_ PERL_CONTEXT* cxstk, I32 startingblock); STATIC void S_save_lines(pTHX_ AV *array, SV *sv); STATIC OP* S_doeval(pTHX_ int gimme, OP** startop); STATIC PerlIO * S_doopen_pmc(pTHX_ const char *name, const char *mode); -STATIC void S_qsortsv(pTHX_ SV ** array, size_t num_elts, SVCOMPARE_t f); #endif #if defined(PERL_IN_PP_HOT_C) || defined(PERL_DECL_PROT) |