Commit dd453e55 authored by rrt's avatar rrt
Browse files

[project @ 2001-07-02 13:08:49 by rrt]

Don't use _WIN32; use mingw32_TARGET_OS and cygwin32_TARGET_OS
instead.
parent e6445900
-- -----------------------------------------------------------------------------
-- $Id: CPUTime.hsc,v 1.7 2001/06/28 16:44:18 rrt Exp $
-- $Id: CPUTime.hsc,v 1.8 2001/07/02 13:08:49 rrt Exp $
--
-- (c) The University of Glasgow, 1995-2001
--
......@@ -37,7 +37,7 @@ import Ratio
getCPUTime :: IO Integer
getCPUTime = do
#ifndef _WIN32
#if !defined(mingw32_TARGET_OS) && !defined(cygwin32_TARGET_OS)
-- getrusage() is right royal pain to deal with when targetting multiple
-- versions of Solaris, since some versions supply it in libc (2.3 and 2.5),
-- while 2.4 has got it in libucb (I wouldn't be too surprised if it was back
......@@ -81,7 +81,7 @@ foreign import unsafe times :: Ptr CTms -> CClock
# endif
#endif
#else /* _WIN32 */
#else /* win32 */
allocaBytes (#const sizeof(FILETIME)) $ \ p_creationTime -> do
allocaBytes (#const sizeof(FILETIME)) $ \ p_exitTime -> do
allocaBytes (#const sizeof(FILETIME)) $ \ p_kernelTime -> do
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment