Change 33478 by [EMAIL PROTECTED] on 2008/03/11 17:49:23
Integrate:
[ 33477]
Integrate:
[ 33451]
On VMS, don't call flex_stat from my_flush as the latter may be
called during global destruction and the former checks hints flags
that depend on the interpreter's still existing.
Affected files ...
... //depot/maint-5.8/perl/vms/vms.c#35 integrate
Differences ...
==== //depot/maint-5.8/perl/vms/vms.c#35 (text) ====
Index: perl/vms/vms.c
--- perl/vms/vms.c#34~33203~ 2008-02-02 10:14:24.000000000 -0800
+++ perl/vms/vms.c 2008-03-11 10:49:23.000000000 -0700
@@ -7062,7 +7062,7 @@
if ((res = fflush(fp)) == 0 && fp) {
#ifdef VMS_DO_SOCKETS
Stat_t s;
- if (Fstat(fileno(fp), &s) == 0 && !S_ISSOCK(s.st_mode))
+ if (fstat(fileno(fp), (stat_t *)&s) == 0 && !S_ISSOCK(s.st_mode))
#endif
res = fsync(fileno(fp));
}
End of Patch.
