[win32] minor cleanup
Gurusamy Sarathy [Sat, 9 May 1998 17:10:15 +0000 (17:10 +0000)]
p4raw-id: //depot/win32/perl@919

MANIFEST
perl.c

index a37563a..483803e 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -948,7 +948,7 @@ win32/bin/search.pl Win32 port
 win32/bin/webget.pl    Win32 port
 win32/bin/www.pl       Win32 port
 win32/config.bc                Win32 base line config.sh (Borland C++ build)
-win32/config.gc                Win32 base line config.sh (GNU build)?
+win32/config.gc                Win32 base line config.sh (mingw32/gcc build)
 win32/config.vc                Win32 base line config.sh (Visual C++ build)
 win32/config_H.bc      Win32 config header (Borland C++ build)
 win32/config_H.gc      Win32 config header (GNU build)?
diff --git a/perl.c b/perl.c
index 52ad7ca..a0b7efb 100644 (file)
--- 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);