#endif
/* This is constant on most architectures, a global on OS/2 */
+#ifdef OS2
+PERLVARI(Gsh_path, char *, SH_PATH)/* full path of shell */
+#else
PERLVARI(Gsh_path, const char *, SH_PATH)/* full path of shell */
+#endif
#ifndef PERL_MICRO
/* If Perl has to ignore SIGPFE, this is its saved state.
PERLVAR(Ghints_mutex, perl_mutex) /* Mutex for refcounted he refcounting */
#endif
-#if defined(USE_THREADS) /* Yes, 5.005 threads - should be removed. */
+#if defined(USE_ITHREADS)
PERLVAR(Gperlio_mutex, perl_mutex) /* Mutex for perlio fd refcounts */
#endif