diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-07-04 04:37:00 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-07-04 04:37:00 +0000 |
| commit | 6c644e7885bc20d759d8cbcb4abaa8f14113c03b (patch) | |
| tree | b06fea5a3d3af10fdc606d828bd9917dfbb7831e /objXSUB.h | |
| parent | 612f20c37ac59506501c890e7f9285f551c793d2 (diff) | |
| download | perl-6c644e7885bc20d759d8cbcb4abaa8f14113c03b.tar.gz | |
fix memory leak on Windows (PL_sys_intern contents were never
freed)
p4raw-id: //depot/perl@6299
Diffstat (limited to 'objXSUB.h')
| -rw-r--r-- | objXSUB.h | 14 |
1 files changed, 8 insertions, 6 deletions
@@ -2166,10 +2166,18 @@ #undef sv_dup #define sv_dup Perl_sv_dup #if defined(HAVE_INTERP_INTERN) +#undef Perl_sys_intern_clear +#define Perl_sys_intern_clear pPerl->Perl_sys_intern_clear +#undef sys_intern_clear +#define sys_intern_clear Perl_sys_intern_clear #undef Perl_sys_intern_dup #define Perl_sys_intern_dup pPerl->Perl_sys_intern_dup #undef sys_intern_dup #define sys_intern_dup Perl_sys_intern_dup +#undef Perl_sys_intern_init +#define Perl_sys_intern_init pPerl->Perl_sys_intern_init +#undef sys_intern_init +#define sys_intern_init Perl_sys_intern_init #endif #undef Perl_ptr_table_new #define Perl_ptr_table_new pPerl->Perl_ptr_table_new @@ -2188,12 +2196,6 @@ #undef ptr_table_split #define ptr_table_split Perl_ptr_table_split #endif -#if defined(HAVE_INTERP_INTERN) -#undef Perl_sys_intern_init -#define Perl_sys_intern_init pPerl->Perl_sys_intern_init -#undef sys_intern_init -#define sys_intern_init Perl_sys_intern_init -#endif #if defined(PERL_OBJECT) #else #endif |