[project @ 2000-02-07 20:57:58 by simonmar]
authorsimonmar <unknown>
Mon, 7 Feb 2000 20:57:58 +0000 (20:57 +0000)
committersimonmar <unknown>
Mon, 7 Feb 2000 20:57:58 +0000 (20:57 +0000)
I'm utterly bemused, but it seems that someone called simonpj disabled
the virtual timer in rev 1.25:

+ #if 0 /* tmp--SDM */
       initialize_virtual_timer(TICK_MILLISECS);
+ #endif

and tried to blame it on me by putting my name in the comment :-)

(Simon - perhaps you copied this file out of my working tree and
committed it by mistake or something?)

ghc/rts/RtsStartup.c

index a1a2995..305c6eb 100644 (file)
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: RtsStartup.c,v 1.27 2000/01/14 13:17:15 hwloidl Exp $
+ * $Id: RtsStartup.c,v 1.28 2000/02/07 20:57:58 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -130,9 +130,7 @@ startupHaskell(int argc, char *argv[])
 
     /* start the ticker */
     install_vtalrm_handler();
-#if 0 /* tmp--SDM */
     initialize_virtual_timer(TICK_MILLISECS);
-#endif
 
     /* start our haskell execution tasks */
 #ifdef SMP