From 2726167bfd053dd5ad0e0cca40b8d24f72189b2c Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 9 Nov 1998 17:51:30 +0000
Subject: [PATCH] [project @ 1998-11-09 17:51:30 by sof] fixed _casm_ ppr
 glitch

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

diff --git a/ghc/compiler/prelude/PrimOp.lhs b/ghc/compiler/prelude/PrimOp.lhs
index 836e8c46a36e..a9cc05c66665 100644
--- a/ghc/compiler/prelude/PrimOp.lhs
+++ b/ghc/compiler/prelude/PrimOp.lhs
@@ -1996,7 +1996,7 @@ pprPrimOp (CCallOp fun is_casm may_gc cconv arg_tys res_ty)
 
 	before
 	  | is_casm && may_gc = "_casm_GC_ ``"
-	  | is_casm	      = "casm_ ``"
+	  | is_casm	      = "_casm_ ``"
 	  | may_gc	      = "_ccall_GC_ "
 	  | otherwise	      = "_ccall_ "
 
-- 
GitLab