From 9070c14b2ce2b85a40997a3992005a88bd6e0549 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Fri, 11 Jul 1997 19:24:42 +0000
Subject: [PATCH] [project @ 1997-07-11 19:24:42 by sof] cygwin32 now uses
 getrusage()

---
 ghc/runtime/storage/SMstats.lc |    5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/ghc/runtime/storage/SMstats.lc b/ghc/runtime/storage/SMstats.lc
index 9411b54..9e98bb7 100644
--- a/ghc/runtime/storage/SMstats.lc
+++ b/ghc/runtime/storage/SMstats.lc
@@ -266,12 +266,15 @@ pagefaults(STG_NO_ARGS)
 static I_
 pagefaults(STG_NO_ARGS)
 {
-# if !defined(HAVE_GETRUSAGE) || irix_TARGET_OS || cygwin32_TARGET_OS
+# if !defined(HAVE_GETRUSAGE) || irix_TARGET_OS
     return 0;
 # else
     struct rusage t;
 
     getrusage(RUSAGE_SELF, &t);
+    /* cygwin32 note: Last time I looked (b18), the ru_majflt field
+       was always filled in with a 0. -- SOF (ToDo: Win32ify?)
+    */
     return(t.ru_majflt);
 # endif
 }
-- 
1.7.10.4