From a6471895fb4a08acb7d637ebee61c72f4213bedf Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 23 Apr 2002 15:49:22 +0000
Subject: [PATCH] [project @ 2002-04-23 15:49:22 by simonmar] Urk,
 PrelPrimopWrappers is now GHCziPrimopWrappers (sigh, this
 should really be done in a less fragile way).

---
 ghc/compiler/ghci/ByteCodeLink.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/ghci/ByteCodeLink.lhs b/ghc/compiler/ghci/ByteCodeLink.lhs
index aa20cc0..6c0ed01 100644
--- a/ghc/compiler/ghci/ByteCodeLink.lhs
+++ b/ghc/compiler/ghci/ByteCodeLink.lhs
@@ -655,7 +655,7 @@ nameToCLabel n suffix
 
 primopToCLabel :: PrimOp -> String{-suffix-} -> String
 primopToCLabel primop suffix
-   = let str = "PrelPrimopWrappers_" ++ occNameString (primOpOcc primop) ++ '_':suffix
+   = let str = "GHCziPrimopWrappers_" ++ occNameString (primOpOcc primop) ++ '_':suffix
      in --trace ("primopToCLabel: " ++ str)
         str
 
-- 
1.7.10.4