diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-01-04 07:59:44 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-01-04 07:59:44 +0000 |
commit | 2d7a92375815264badaef23c612657cbd4799f31 (patch) | |
tree | a21bf70b8eb3f8982a62d2acf344771f2d96e952 /lib | |
parent | 25931d335858f0e7767af03260b9bb9ad7a959d5 (diff) | |
download | perl-2d7a92375815264badaef23c612657cbd4799f31.tar.gz |
[win32] Various win32 fixes
- support spawn via system(&P_NOWAIT,...) like OS2
- support wait() and waitpid()
- s/GetCurrentDirectory/GetCwd/, long-named XS to be removed
- support -lfoo properly in ExtUtils::Liblist
- fix outdated info about Win32 support in perlfaq2
- fix win32 bug in perldoc that causes spurious warnings
- regularize global function/variable names yet more
- fix bug in do_aspawn() (it was always invoking shell, instead of
almost never)
- implement and export win32_wait()
- stub version of USE_RTL_THREAD_API
p4raw-id: //depot/win32/perl@391
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Cwd.pm | 4 | ||||
-rw-r--r-- | lib/ExtUtils/Liblist.pm | 20 |
2 files changed, 13 insertions, 11 deletions
diff --git a/lib/Cwd.pm b/lib/Cwd.pm index 6952411ca2..048842b4ac 100644 --- a/lib/Cwd.pm +++ b/lib/Cwd.pm @@ -339,13 +339,13 @@ sub _os2_cwd { } sub _win32_cwd { - $ENV{'PWD'} = Win32::GetCurrentDirectory(); + $ENV{'PWD'} = Win32::GetCwd(); $ENV{'PWD'} =~ s:\\:/:g ; return $ENV{'PWD'}; } *_NT_cwd = \&_win32_cwd if (!defined &_NT_cwd && - defined &Win32::GetCurrentDirectory); + defined &Win32::GetCwd); *_NT_cwd = \&_os2_cwd unless defined &_NT_cwd; diff --git a/lib/ExtUtils/Liblist.pm b/lib/ExtUtils/Liblist.pm index d821e83729..aebb057d58 100644 --- a/lib/ExtUtils/Liblist.pm +++ b/lib/ExtUtils/Liblist.pm @@ -231,7 +231,9 @@ sub _win32_ext { } # Handle possible library arguments. - $thislib =~ s/^-l//; + if ($thislib =~ s/^-l// and $thislib !~ /^lib/i) { + $thislib = "lib$thislib"; + } $thislib .= $libext if $thislib !~ /\Q$libext\E$/i; my($found_lib)=0; @@ -522,14 +524,14 @@ Unix-OS/2 version in several respects: Input library and path specifications are accepted with or without the C<-l> and C<-L> prefices used by Unix linkers. C<-lfoo> specifies the -library C<foo.lib> and C<-Ls:ome\dir> specifies a directory to look for -the libraries that follow. If neither prefix is present, a token is -considered a directory to search if it is in fact a directory, and a -library to search for otherwise. The C<$Config{lib_ext}> suffix will -be appended to any entries that are not directories and don't already -have the suffix. Authors who wish their extensions to be portable to -Unix or OS/2 should use the Unix prefixes, since the Unix-OS/2 version -of ext() requires them. +library C<libfoo.lib> (unless C<foo> already starts with C<lib>), and +C<-Ls:ome\dir> specifies a directory to look for the libraries that follow. +If neither prefix is present, a token is considered a directory to search +if it is in fact a directory, and a library to search for otherwise. The +C<$Config{lib_ext}> suffix will be appended to any entries that are not +directories and don't already have the suffix. Authors who wish their +extensions to be portable to Unix or OS/2 should use the Unix prefixes, +since the Unix-OS/2 version of ext() requires them. =item * |