From 741cc678003a82df9afaca60c8027f84170460bb Mon Sep 17 00:00:00 2001
From: kouji <kouji@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 12 Aug 2008 09:55:06 +0000
Subject: * gc.c (getrusage_time): Returned effective value on Windows.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@18536 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 gc.c | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

(limited to 'gc.c')

diff --git a/gc.c b/gc.c
index 94f7af12bf..0e2da328be 100644
--- a/gc.c
+++ b/gc.c
@@ -119,6 +119,27 @@ getrusage_time(void)
     getrusage(RUSAGE_SELF, &usage);
     time = usage.ru_utime;
     return time.tv_sec + time.tv_usec * 1e-6;
+#elif defined _WIN32
+    FILETIME creation_time, exit_time, kernel_time, user_time;
+    ULARGE_INTEGER ui;
+    LONG_LONG q;
+    double t;
+    
+    if (GetProcessTimes(GetCurrentProcess(),
+			&creation_time, &exit_time, &kernel_time, &user_time) == 0)
+    {
+	return 0.0;
+    }
+    memcpy(&ui, &user_time, sizeof(FILETIME));
+    q = ui.QuadPart / 10L;
+    t = (DWORD)(q % 1000000L) * 1e-6;
+    q /= 1000000L;
+#ifdef __GNUC__
+    t += q;
+#else
+    t += (double)(DWORD)(q >> 16) * (1 << 16);
+    t += (DWORD)q & ~(~0 << 16);
+#endif
 #else
     return 0.0;
 #endif
-- 
cgit v1.2.3