Another change for GHC.PrimopWrappers moving from base to ghc-prim
authorIan Lynagh <igloo@earth.li>
Mon, 24 Mar 2008 22:40:06 +0000 (22:40 +0000)
committerIan Lynagh <igloo@earth.li>
Mon, 24 Mar 2008 22:40:06 +0000 (22:40 +0000)
compiler/ghci/ByteCodeLink.lhs

index 939b9b6..63dd7a4 100644 (file)
@@ -275,7 +275,7 @@ nameToCLabel n suffix
 
 primopToCLabel :: PrimOp -> String{-suffix-} -> String
 primopToCLabel primop suffix
-   = let str = "base_GHCziPrimopWrappers_" ++ unpackFS (zEncodeFS (occNameFS (primOpOcc primop))) ++ '_':suffix
+   = let str = "ghczmprim_GHCziPrimopWrappers_" ++ unpackFS (zEncodeFS (occNameFS (primOpOcc primop))) ++ '_':suffix
      in --trace ("primopToCLabel: " ++ str)
         str
 \end{code}