Author: richter
Date: Sun Apr 23 20:44:17 2006
New Revision: 396402
URL: http://svn.apache.org/viewcvs?rev=396402&view=rev
Log:
use _stat() on win32
Modified:
perl/embperl/trunk/Changes.pod
perl/embperl/trunk/epcache.c
Modified: perl/embperl/trunk/Changes.pod
URL:
http://svn.apache.org/viewcvs/perl/embperl/trunk/Changes.pod?rev=396402&r1=396401&r2=396402&view=diff
==============================================================================
--- perl/embperl/trunk/Changes.pod (original)
+++ perl/embperl/trunk/Changes.pod Sun Apr 23 20:44:17 2006
@@ -4,6 +4,9 @@
- Fixed wrong version numbers in make test files,
which caused make test to fail. Spotted by Matt Bockol.
+ - Use _stat() instead of stat() on Win32 to work around the problem
+ that Perl redefines stat() in an incompatibel way.
+ Spotted by Randy Korbes.
- Documented all options of embpexec.pl.
=head1 2.2.0 8. Apr. 2006
Modified: perl/embperl/trunk/epcache.c
URL:
http://svn.apache.org/viewcvs/perl/embperl/trunk/epcache.c?rev=396402&r1=396401&r2=396402&view=diff
==============================================================================
--- perl/embperl/trunk/epcache.c (original)
+++ perl/embperl/trunk/epcache.c Sun Apr 23 20:44:17 2006
@@ -730,7 +730,11 @@
if (pItem -> sExpiresFilename)
{
+#ifdef WIN32
+ if (_stat (pItem -> sExpiresFilename, &pItem -> FileStat))
+#else
if (stat (pItem -> sExpiresFilename, &pItem -> FileStat))
+#endif
{
if (r -> Component.Config.bDebug & dbgCache)
lprintf (r -> pApp, "[%d]CACHE: %s expired because cannot
stat file %s\n", r -> pThread -> nPid, pItem -> sKey, pItem ->
sExpiresFilename) ;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
