From: Simon Marlow <simonmar@microsoft.com>
Date: Thu, 8 Mar 2007 10:19:21 +0000 (+0000)
Subject: add missing %ENTRY_CODE()
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=db027550441fdce8f7bb59500345c47a21e90f25

add missing %ENTRY_CODE()
fixes unreg way in HEAD
---

diff --git a/rts/Exception.cmm b/rts/Exception.cmm
index c86c6d5..ce2ea27 100644
--- a/rts/Exception.cmm
+++ b/rts/Exception.cmm
@@ -291,7 +291,7 @@ INFO_TABLE_RET(stg_catch_frame,
 #ifdef REG_R1
    {
       Sp = Sp + SIZEOF_StgCatchFrame;
-      jump Sp(SP_OFF);
+      jump %ENTRY_CODE(Sp(SP_OFF));
    }
 #else
    {
@@ -299,7 +299,7 @@ INFO_TABLE_RET(stg_catch_frame,
       rval = Sp(0);
       Sp = Sp + SIZEOF_StgCatchFrame;
       Sp(0) = rval;
-      jump Sp(SP_OFF);
+      jump %ENTRY_CODE(Sp(SP_OFF));
    }
 #endif