#ifndef HAS_LOCALTIME_R
/* Simulate localtime_r() to the best of our ability */
static struct tm * S_localtime_r(const time_t *clock, struct tm *result) {
-#ifdef VMS
- dTHX; /* in case the following is defined as Perl_my_localtime(aTHX_ ...) */
+#ifdef __VMS
+ dTHX; /* the following is defined as Perl_my_localtime(aTHX_ ...) */
#endif
const struct tm *static_result = localtime(clock);
#ifndef HAS_GMTIME_R
/* Simulate gmtime_r() to the best of our ability */
static struct tm * S_gmtime_r(const time_t *clock, struct tm *result) {
+#ifdef __VMS
+ dTHX; /* the following is defined as Perl_my_localtime(aTHX_ ...) */
+#endif
const struct tm *static_result = gmtime(clock);
assert(result != NULL);