-# Used only in ExtUtils::Liblist::Kid::_win32_ext()
-push @toolchain, 'cpan/Text-ParseWords/lib' if $^O eq 'MSWin32';
+# These are for XS building on Win32, since nonxs and xs build simultaneously
+# on Win32 if parallel building
+push @toolchain, qw(
+ dist/ExtUtils-ParseXS/lib
+ cpan/parent/lib
+ cpan/ExtUtils-Constant/lib
+ dist/base/lib
+) if $^O eq 'MSWin32';
+push @toolchain, 'ext/VMS-Filespec/lib' if $^O eq 'VMS';
+
+unshift @INC, @toolchain;
+require File::Spec::Functions;
+require Cwd;
+
+my $cwd = Cwd::getcwd();
+
+defined $cwd
+ or die "$0: Can't determine current working directory\n";