]> gitweb.factorcode.org Git - factor.git/blob - libs/calendar/os-win32.factor
more sql changes
[factor.git] / libs / calendar / os-win32.factor
1 IN: calendar
2 USING: alien kernel math win32-api ;
3
4 : gmt-offset
5     "TIME_ZONE_INFORMATION" <c-object> dup GetTimeZoneInformation drop
6     dup TIME_ZONE_INFORMATION-Bias swap TIME_ZONE_INFORMATION-DaylightBias +
7     60 /f neg ;
8