diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 2000-02-09 09:29:06 +0000 |
|---|---|---|
| committer | bailey <bailey@newman.upenn.edu> | 2000-02-09 09:29:06 +0000 |
| commit | 32da55abecac94dc6a18cbca78eb8321199543f1 (patch) | |
| tree | 390fd784f9a50e98480a55eebff4c6572fca6702 /vms/vms.c | |
| parent | cb50131aab68ac6dda048612c6e853b8cb08701e (diff) | |
| download | perl-32da55abecac94dc6a18cbca78eb8321199543f1.tar.gz | |
Minor fixes to assuage picky compilers (unsigned comparisons and
alias rules lead to compilation warnings)
p4raw-id: //depot/vmsperl@5050
Diffstat (limited to 'vms/vms.c')
| -rw-r--r-- | vms/vms.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3979,7 +3979,7 @@ static time_t toutc_dst(time_t loc) { if (rsltmp->tm_isdst) loc -= 3600; return loc; } -#define _toutc(secs) ((secs) == -1 ? -1 : \ +#define _toutc(secs) ((secs) == (time_t) -1 ? (time_t) -1 : \ ((gmtime_emulation_type || my_time(NULL)), \ (gmtime_emulation_type == 1 ? toutc_dst(secs) : \ ((secs) - utc_offset_secs)))) @@ -3992,7 +3992,7 @@ static time_t toloc_dst(time_t utc) { if (rsltmp->tm_isdst) utc += 3600; return utc; } -#define _toloc(secs) ((secs) == -1 ? -1 : \ +#define _toloc(secs) ((secs) == (time_t) -1 ? (time_t) -1 : \ ((gmtime_emulation_type || my_time(NULL)), \ (gmtime_emulation_type == 1 ? toloc_dst(secs) : \ ((secs) + utc_offset_secs)))) |