steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix calendar. oops

db4
Doug Coleman 2008-04-11 14:25:37 -05:00
parent 723696fa32
commit 83a467fd6a
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
extra/calendar/windows/windows.factor
View File

@ -5,10 +5,10 @@ IN: calendar.windows
M: windows gmt-offset ( -- hours minutes seconds )
"TIME_ZONE_INFORMATION" <c-object>
dup GetTimeZoneInformation {
{ \ TIME_ZONE_ID_INVALID [ win32-error-string throw ] }
{ \ TIME_ZONE_ID_UNKNOWN [ TIME_ZONE_INFORMATION-Bias ] }
{ \ TIME_ZONE_ID_STANDARD [ TIME_ZONE_INFORMATION-Bias ] }
{ \ TIME_ZONE_ID_DAYLIGHT [
{ TIME_ZONE_ID_INVALID [ win32-error-string throw ] }
{ TIME_ZONE_ID_UNKNOWN [ TIME_ZONE_INFORMATION-Bias ] }
{ TIME_ZONE_ID_STANDARD [ TIME_ZONE_INFORMATION-Bias ] }
{ TIME_ZONE_ID_DAYLIGHT [
[ TIME_ZONE_INFORMATION-Bias ]
[ TIME_ZONE_INFORMATION-DaylightBias ] bi +
] }