[win32] minor cleanup

p4raw-id: //depot/win32/perl@919

1 files changed, 0 insertions, 1 deletions

diff --git a/perl.c b/perl.c
index 52ad7ca9c2..a0b7efbb92 100644
--- a/perl.c
+++ b/perl.c
@@ -2836,7 +2836,6 @@ init_main_thread()
     SvLEN_set(thrsv, sizeof(thr));
     *SvEND(thrsv) = '\0';	/* in the trailing_nul field */
     thr->oursv = thrsv;
-    curcop = &compiling;
     chopset = " \n-";
 
     MUTEX_LOCK(&threads_mutex);