slight change to implementation of time-gmt-offset so that the

gmt_off field of the tm struct is not used (not available in
cygwin).
This commit is contained in:
Abdulaziz Ghuloum 2007-12-11 19:32:34 -05:00
parent 54f683f0e0
commit af020f909b
1 changed files with 5 additions and 0 deletions

View File

@ -849,9 +849,14 @@ ikrt_gmt_offset(ikp t){
time_t clock =
unfix(ref(t, off_record_data + 0*wordsize)) * 1000000
+ unfix(ref(t, off_record_data + 1*wordsize));
struct tm* m = gmtime(&clock);
time_t gmtclock = mktime(m);
return fix(clock - gmtclock);
/*
struct tm* m = localtime(&clock);
ikp r = fix(m->tm_gmtoff);
return r;
*/
}