From 02429dc2ddf9362e871c6b86f39707ca5c6d7c10 Mon Sep 17 00:00:00 2001
From: sewardj <unknown>
Date: Thu, 27 Apr 2000 16:29:55 +0000
Subject: [PATCH] [project @ 2000-04-27 16:29:55 by sewardj] Remove misleading
 comment about registerisation assumptions.

---
 ghc/rts/StgMiscClosures.hc |    5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/ghc/rts/StgMiscClosures.hc b/ghc/rts/StgMiscClosures.hc
index 4861c88..132caaa 100644
--- a/ghc/rts/StgMiscClosures.hc
+++ b/ghc/rts/StgMiscClosures.hc
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: StgMiscClosures.hc,v 1.43 2000/04/19 10:51:59 simonmar Exp $
+ * $Id: StgMiscClosures.hc,v 1.44 2000/04/27 16:29:55 sewardj Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -46,8 +46,6 @@ STGFUN(type##_entry)							\
 
 /* -----------------------------------------------------------------------------
    Entry code for an indirection.
-
-   This code assumes R1 is in a register for now.
    -------------------------------------------------------------------------- */
 
 INFO_TABLE(IND_info,IND_entry,1,0,IND,,EF_,0,0);
@@ -67,7 +65,6 @@ STGFUN(IND_STATIC_entry)
 {
     FB_
     TICK_ENT_IND(Node);	/* tick */
-  
     R1.p = (P_) ((StgIndStatic*)R1.p)->indirectee;
     TICK_ENT_VIA_NODE();
     JMP_(ENTRY_CODE(*R1.p));
-- 
1.7.10.4