Correct the correction :-(

p4raw-id: //depot/perl@8721

1 files changed, 1 insertions, 1 deletions

diff --git a/perl.c b/perl.c
index 78a4a54e26..b0c1cefae4 100644
--- a/perl.c
+++ b/perl.c
@@ -698,7 +698,7 @@ perl_destruct(pTHXx)
     }
     SvREFCNT_dec(PL_strtab);
 
-#ifdef USE_THREADS
+#ifdef USE_ITHREADS
     /* free the pointer table used for cloning */
     ptr_table_free(PL_ptr_table);
 #endif