From b8644e3d49014e2f06db088936b643f9d62c7573 Mon Sep 17 00:00:00 2001
From: sewardj <unknown>
Date: Thu, 15 Feb 2001 17:22:15 +0000
Subject: [PATCH] [project @ 2001-02-15 17:22:15 by sewardj] Correct usage
 info for tryPutMVar#.

---
 ghc/compiler/prelude/primops.txt |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/compiler/prelude/primops.txt b/ghc/compiler/prelude/primops.txt
index 1d3d99a..5ea03c4 100644
--- a/ghc/compiler/prelude/primops.txt
+++ b/ghc/compiler/prelude/primops.txt
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------
--- $Id: primops.txt,v 1.16 2001/02/14 12:59:35 simonmar Exp $
+-- $Id: primops.txt,v 1.17 2001/02/15 17:22:15 sewardj Exp $
 --
 -- Primitive Operations
 --
@@ -1020,7 +1020,7 @@ primop  TryPutMVarOp "tryPutMVar#" GenPrimOp
    MVar# s a -> a -> State# s -> (# State# s, Int# #)
    with
    strictness       = { \ arity -> StrictnessInfo [wwPrim, wwLazy, wwPrim] False }
-   usage            = { mangle PutMVarOp [mkM, mkM, mkP] mkR }
+   usage            = { mangle TryPutMVarOp [mkM, mkM, mkP] mkR }
    has_side_effects = True
    out_of_line      = True
 
-- 
1.7.10.4