2008-06-27 14:49:10 -04:00
|
|
|
IN: micros.windows
|
2008-06-27 21:18:51 -04:00
|
|
|
USING: system kernel windows.time math math.functions micros.backend ;
|
2008-06-27 14:49:10 -04:00
|
|
|
|
|
|
|
|
! 116444736000000000 is the windowstime epoch offset
|
|
|
|
|
! since windowstime starts at 1600 and unix epoch is 1970
|
|
|
|
|
M: windows (micros)
|
|
|
|
|
windows-time 116444736000000000 - 10 / truncate ;
|
