diff options
| author | Duncan Coutts <duncan@well-typed.com> | 2011-10-25 18:40:46 +0100 |
|---|---|---|
| committer | Duncan Coutts <duncan@well-typed.com> | 2011-10-26 12:00:42 +0100 |
| commit | 17c166232cf2a547a9b0a4fce5f38307ae64f157 (patch) | |
| tree | 2b7651896608d381abdceb5cb13c18cabe992413 /rts/win32/GetTime.c | |
| parent | f9c2157310ee428ab969563ee889750d036ab38c (diff) | |
| download | haskell-17c166232cf2a547a9b0a4fce5f38307ae64f157.tar.gz | |
Delete some old Win9x C code
Diffstat (limited to 'rts/win32/GetTime.c')
| -rw-r--r-- | rts/win32/GetTime.c | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/rts/win32/GetTime.c b/rts/win32/GetTime.c index 5866141dda..9699bd69f4 100644 --- a/rts/win32/GetTime.c +++ b/rts/win32/GetTime.c @@ -27,26 +27,6 @@ fileTimeToTicks(FILETIME ft) return t; } -static int is_win9x = -1; - -static INLINE_ME rtsBool -isWin9x(void) -{ - if (is_win9x < 0) { - /* figure out whether we're on a Win9x box or not. */ - OSVERSIONINFO oi; - BOOL b; - - /* Need to init the size field first.*/ - oi.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); - b = GetVersionEx(&oi); - - is_win9x = ( (b && (oi.dwPlatformId & VER_PLATFORM_WIN32_WINDOWS)) ? 1 : 0); - } - return is_win9x; -} - - void getProcessTimes(Ticks *user, Ticks *elapsed) { @@ -59,8 +39,6 @@ getProcessCPUTime(void) { FILETIME creationTime, exitTime, userTime, kernelTime = {0,0}; - if (isWin9x()) return getProcessElapsedTime(); - if (!GetProcessTimes(GetCurrentProcess(), &creationTime, &exitTime, &kernelTime, &userTime)) { return 0; @@ -106,8 +84,6 @@ getThreadCPUTime(void) { FILETIME creationTime, exitTime, userTime, kernelTime = {0,0}; - if (isWin9x()) return getProcessCPUTime(); - if (!GetThreadTimes(GetCurrentThread(), &creationTime, &exitTime, &kernelTime, &userTime)) { return 0; |