style: Detabify indentation of the C code maintained by the core.

This just detabifies to get rid of the mixed tab/space indentation.

Applying consistent indentation and dealing with other tabs are another issue.

Done with `expand -i`.

* vutil.* left alone, it's part of version.
* Left regen managed files alone for now.

1 files changed, 88 insertions, 88 deletions

diff --git a/win32/perllib.c b/win32/perllib.c
index 9948a1a3ba..a8fe7af9c0 100644
--- a/win32/perllib.c
+++ b/win32/perllib.c
@@ -51,85 +51,85 @@ win32_checkTLS(PerlInterpreter *host_perl)
 {
     dTHX;
     if (host_perl != my_perl) {
-	int *nowhere = NULL;
-	abort();
+        int *nowhere = NULL;
+        abort();
     }
 }
 
 EXTERN_C void
 perl_get_host_info(struct IPerlMemInfo* perlMemInfo,
-		   struct IPerlMemInfo* perlMemSharedInfo,
-		   struct IPerlMemInfo* perlMemParseInfo,
-		   struct IPerlEnvInfo* perlEnvInfo,
-		   struct IPerlStdIOInfo* perlStdIOInfo,
-		   struct IPerlLIOInfo* perlLIOInfo,
-		   struct IPerlDirInfo* perlDirInfo,
-		   struct IPerlSockInfo* perlSockInfo,
-		   struct IPerlProcInfo* perlProcInfo)
+                   struct IPerlMemInfo* perlMemSharedInfo,
+                   struct IPerlMemInfo* perlMemParseInfo,
+                   struct IPerlEnvInfo* perlEnvInfo,
+                   struct IPerlStdIOInfo* perlStdIOInfo,
+                   struct IPerlLIOInfo* perlLIOInfo,
+                   struct IPerlDirInfo* perlDirInfo,
+                   struct IPerlSockInfo* perlSockInfo,
+                   struct IPerlProcInfo* perlProcInfo)
 {
     if (perlMemInfo) {
-	Copy(&perlMem, &perlMemInfo->perlMemList, perlMemInfo->nCount, void*);
-	perlMemInfo->nCount = (sizeof(struct IPerlMem)/sizeof(void*));
+        Copy(&perlMem, &perlMemInfo->perlMemList, perlMemInfo->nCount, void*);
+        perlMemInfo->nCount = (sizeof(struct IPerlMem)/sizeof(void*));
     }
     if (perlMemSharedInfo) {
-	Copy(&perlMem, &perlMemSharedInfo->perlMemList, perlMemSharedInfo->nCount, void*);
-	perlMemSharedInfo->nCount = (sizeof(struct IPerlMem)/sizeof(void*));
+        Copy(&perlMem, &perlMemSharedInfo->perlMemList, perlMemSharedInfo->nCount, void*);
+        perlMemSharedInfo->nCount = (sizeof(struct IPerlMem)/sizeof(void*));
     }
     if (perlMemParseInfo) {
-	Copy(&perlMem, &perlMemParseInfo->perlMemList, perlMemParseInfo->nCount, void*);
-	perlMemParseInfo->nCount = (sizeof(struct IPerlMem)/sizeof(void*));
+        Copy(&perlMem, &perlMemParseInfo->perlMemList, perlMemParseInfo->nCount, void*);
+        perlMemParseInfo->nCount = (sizeof(struct IPerlMem)/sizeof(void*));
     }
     if (perlEnvInfo) {
-	Copy(&perlEnv, &perlEnvInfo->perlEnvList, perlEnvInfo->nCount, void*);
-	perlEnvInfo->nCount = (sizeof(struct IPerlEnv)/sizeof(void*));
+        Copy(&perlEnv, &perlEnvInfo->perlEnvList, perlEnvInfo->nCount, void*);
+        perlEnvInfo->nCount = (sizeof(struct IPerlEnv)/sizeof(void*));
     }
     if (perlStdIOInfo) {
-	Copy(&perlStdIO, &perlStdIOInfo->perlStdIOList, perlStdIOInfo->nCount, void*);
-	perlStdIOInfo->nCount = (sizeof(struct IPerlStdIO)/sizeof(void*));
+        Copy(&perlStdIO, &perlStdIOInfo->perlStdIOList, perlStdIOInfo->nCount, void*);
+        perlStdIOInfo->nCount = (sizeof(struct IPerlStdIO)/sizeof(void*));
     }
     if (perlLIOInfo) {
-	Copy(&perlLIO, &perlLIOInfo->perlLIOList, perlLIOInfo->nCount, void*);
-	perlLIOInfo->nCount = (sizeof(struct IPerlLIO)/sizeof(void*));
+        Copy(&perlLIO, &perlLIOInfo->perlLIOList, perlLIOInfo->nCount, void*);
+        perlLIOInfo->nCount = (sizeof(struct IPerlLIO)/sizeof(void*));
     }
     if (perlDirInfo) {
-	Copy(&perlDir, &perlDirInfo->perlDirList, perlDirInfo->nCount, void*);
-	perlDirInfo->nCount = (sizeof(struct IPerlDir)/sizeof(void*));
+        Copy(&perlDir, &perlDirInfo->perlDirList, perlDirInfo->nCount, void*);
+        perlDirInfo->nCount = (sizeof(struct IPerlDir)/sizeof(void*));
     }
     if (perlSockInfo) {
-	Copy(&perlSock, &perlSockInfo->perlSockList, perlSockInfo->nCount, void*);
-	perlSockInfo->nCount = (sizeof(struct IPerlSock)/sizeof(void*));
+        Copy(&perlSock, &perlSockInfo->perlSockList, perlSockInfo->nCount, void*);
+        perlSockInfo->nCount = (sizeof(struct IPerlSock)/sizeof(void*));
     }
     if (perlProcInfo) {
-	Copy(&perlProc, &perlProcInfo->perlProcList, perlProcInfo->nCount, void*);
-	perlProcInfo->nCount = (sizeof(struct IPerlProc)/sizeof(void*));
+        Copy(&perlProc, &perlProcInfo->perlProcList, perlProcInfo->nCount, void*);
+        perlProcInfo->nCount = (sizeof(struct IPerlProc)/sizeof(void*));
     }
 }
 
 EXTERN_C PerlInterpreter*
 perl_alloc_override(struct IPerlMem** ppMem, struct IPerlMem** ppMemShared,
-		 struct IPerlMem** ppMemParse, struct IPerlEnv** ppEnv,
-		 struct IPerlStdIO** ppStdIO, struct IPerlLIO** ppLIO,
-		 struct IPerlDir** ppDir, struct IPerlSock** ppSock,
-		 struct IPerlProc** ppProc)
+                 struct IPerlMem** ppMemParse, struct IPerlEnv** ppEnv,
+                 struct IPerlStdIO** ppStdIO, struct IPerlLIO** ppLIO,
+                 struct IPerlDir** ppDir, struct IPerlSock** ppSock,
+                 struct IPerlProc** ppProc)
 {
     PerlInterpreter *my_perl = NULL;
     CPerlHost* pHost = new CPerlHost(ppMem, ppMemShared, ppMemParse, ppEnv,
-				     ppStdIO, ppLIO, ppDir, ppSock, ppProc);
+                                     ppStdIO, ppLIO, ppDir, ppSock, ppProc);
 
     if (pHost) {
-	my_perl = perl_alloc_using(pHost->m_pHostperlMem,
-				   pHost->m_pHostperlMemShared,
-				   pHost->m_pHostperlMemParse,
-				   pHost->m_pHostperlEnv,
-				   pHost->m_pHostperlStdIO,
-				   pHost->m_pHostperlLIO,
-				   pHost->m_pHostperlDir,
-				   pHost->m_pHostperlSock,
-				   pHost->m_pHostperlProc);
-	if (my_perl) {
-	    w32_internal_host = pHost;
-	    pHost->host_perl  = my_perl;
-	}
+        my_perl = perl_alloc_using(pHost->m_pHostperlMem,
+                                   pHost->m_pHostperlMemShared,
+                                   pHost->m_pHostperlMemParse,
+                                   pHost->m_pHostperlEnv,
+                                   pHost->m_pHostperlStdIO,
+                                   pHost->m_pHostperlLIO,
+                                   pHost->m_pHostperlDir,
+                                   pHost->m_pHostperlSock,
+                                   pHost->m_pHostperlProc);
+        if (my_perl) {
+            w32_internal_host = pHost;
+            pHost->host_perl  = my_perl;
+        }
     }
     return my_perl;
 }
@@ -140,19 +140,19 @@ perl_alloc(void)
     PerlInterpreter* my_perl = NULL;
     CPerlHost* pHost = new CPerlHost();
     if (pHost) {
-	my_perl = perl_alloc_using(pHost->m_pHostperlMem,
-				   pHost->m_pHostperlMemShared,
-				   pHost->m_pHostperlMemParse,
-				   pHost->m_pHostperlEnv,
-				   pHost->m_pHostperlStdIO,
-				   pHost->m_pHostperlLIO,
-				   pHost->m_pHostperlDir,
-				   pHost->m_pHostperlSock,
-				   pHost->m_pHostperlProc);
-	if (my_perl) {
-	    w32_internal_host = pHost;
+        my_perl = perl_alloc_using(pHost->m_pHostperlMem,
+                                   pHost->m_pHostperlMemShared,
+                                   pHost->m_pHostperlMemParse,
+                                   pHost->m_pHostperlEnv,
+                                   pHost->m_pHostperlStdIO,
+                                   pHost->m_pHostperlLIO,
+                                   pHost->m_pHostperlDir,
+                                   pHost->m_pHostperlSock,
+                                   pHost->m_pHostperlProc);
+        if (my_perl) {
+            w32_internal_host = pHost;
             pHost->host_perl  = my_perl;
-	}
+        }
     }
     return my_perl;
 }
@@ -178,7 +178,7 @@ RunPerl(int argc, char **argv, char **env)
     PERL_SYS_INIT(&argc,&argv);
 
     if (!(my_perl = perl_alloc()))
-	return (1);
+        return (1);
     perl_construct(my_perl);
     PL_perl_destruct_level = 0;
 
@@ -194,11 +194,11 @@ RunPerl(int argc, char **argv, char **env)
 
     if (!perl_parse(my_perl, xs_init, argc, argv, env)) {
 #if defined(TOP_CLONE) && defined(USE_ITHREADS)		/* XXXXXX testing */
-	new_perl = perl_clone(my_perl, 1);
-	(void) perl_run(new_perl);
-	PERL_SET_THX(my_perl);
+        new_perl = perl_clone(my_perl, 1);
+        (void) perl_run(new_perl);
+        PERL_SET_THX(my_perl);
 #else
-	(void) perl_run(my_perl);
+        (void) perl_run(my_perl);
 #endif
     }
 
@@ -206,9 +206,9 @@ RunPerl(int argc, char **argv, char **env)
     perl_free(my_perl);
 #ifdef USE_ITHREADS
     if (new_perl) {
-	PERL_SET_THX(new_perl);
-	exitstatus = perl_destruct(new_perl);
-	perl_free(new_perl);
+        PERL_SET_THX(new_perl);
+        exitstatus = perl_destruct(new_perl);
+        perl_free(new_perl);
     }
 #endif
 
@@ -229,23 +229,23 @@ EXTERN_C		/* GCC in C++ mode mangles the name, otherwise */
 #endif
 BOOL APIENTRY
 DllMain(HINSTANCE hModule,	/* DLL module handle */
-	DWORD fdwReason,	/* reason called */
-	LPVOID lpvReserved)	/* reserved */
+        DWORD fdwReason,	/* reason called */
+        LPVOID lpvReserved)	/* reserved */
 { 
     switch (fdwReason) {
-	/* The DLL is attaching to a process due to process
-	 * initialization or a call to LoadLibrary.
-	 */
+        /* The DLL is attaching to a process due to process
+         * initialization or a call to LoadLibrary.
+         */
     case DLL_PROCESS_ATTACH:
-	DisableThreadLibraryCalls((HMODULE)hModule);
+        DisableThreadLibraryCalls((HMODULE)hModule);
 
-	w32_perldll_handle = hModule;
-	set_w32_module_name();
-	break;
+        w32_perldll_handle = hModule;
+        set_w32_module_name();
+        break;
 
-	/* The DLL is detaching from a process due to
-	 * process termination or call to FreeLibrary.
-	 */
+        /* The DLL is detaching from a process due to
+         * process termination or call to FreeLibrary.
+         */
     case DLL_PROCESS_DETACH:
         /* As long as we use TerminateProcess()/TerminateThread() etc. for mimicing kill()
            anything here had better be harmless if:
@@ -253,23 +253,23 @@ DllMain(HINSTANCE hModule,	/* DLL module handle */
             B. Called after memory allocation for Heap has been forcibly removed by OS.
             PerlIO_cleanup() was done here but fails (B).
          */     
-	EndSockets();
+        EndSockets();
 #if defined(USE_ITHREADS)
-	if (PL_curinterp)
-	    FREE_THREAD_KEY;
+        if (PL_curinterp)
+            FREE_THREAD_KEY;
 #endif
-	break;
+        break;
 
-	/* The attached process creates a new thread. */
+        /* The attached process creates a new thread. */
     case DLL_THREAD_ATTACH:
-	break;
+        break;
 
-	/* The thread of the attached process terminates. */
+        /* The thread of the attached process terminates. */
     case DLL_THREAD_DETACH:
-	break;
+        break;
 
     default:
-	break;
+        break;
     }
     return TRUE;
 }
@@ -295,6 +295,6 @@ perl_clone_host(PerlInterpreter* proto_perl, UV flags) {
     proto_perl->Isys_intern.internal_host = h;
     h->host_perl  = proto_perl;
     return proto_perl;
-	
+        
 }
 #endif