diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-02-05 11:15:34 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-02-05 11:15:34 +0000 |
| commit | 7af12a3427fcb35d914dabc3dae6f54bdba16995 (patch) | |
| tree | f96de251a37dee089b3b8f221db4ecb33a6fd1fa /perl.c | |
| parent | 02ca4724741a496db86d1f4591929ced61e3be44 (diff) | |
| download | perl-7af12a3427fcb35d914dabc3dae6f54bdba16995.tar.gz | |
Without this Windows and Netware compilers should be complaining
about perl.c having code before a declaration, *but only if compiling
with PERL_TRACK_MEMPOOL*. So, will it fix the smoke failures? Place
bets now.
p4raw-id: //depot/perl@27089
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 12 |
1 files changed, 7 insertions, 5 deletions
@@ -1295,18 +1295,20 @@ perl_free(pTHXx) #endif #if defined(WIN32) || defined(NETWARE) + { # if defined(PERL_IMPLICIT_SYS) # ifdef NETWARE - void *host = nw_internal_host; + void *host = nw_internal_host; # else - void *host = w32_internal_host; + void *host = w32_internal_host; # endif - PerlMem_free(aTHXx); + PerlMem_free(aTHXx); # ifdef NETWARE - nw_delete_internal_host(host); + nw_delete_internal_host(host); # else - win32_delete_internal_host(host); + win32_delete_internal_host(host); # endif + } # else PerlMem_free(aTHXx); # endif |