[project @ 2000-03-28 13:18:49 by simonmar]

Don't use "ccall" as a variable name; it confuses the interface file
parser in 4.06.  This bug has been fixed in 4.07.

diff --git a/ghc/compiler/prelude/PrimOp.lhs b/ghc/compiler/prelude/PrimOp.lhs
index a6dce94..3a12825 100644 (file)
--- a/ghc/compiler/prelude/PrimOp.lhs
+++ b/ghc/compiler/prelude/PrimOp.lhs
@@ -1943,7 +1943,7 @@ primOpOutOfLine op
          -- it is done out-of-line rather than require
          -- the NCG to implement it.
 
-       CCallOp ccall -> ccallMayGC ccall
+       CCallOp c_call -> ccallMayGC c_call
 
        other -> False
 \end{code}
@@ -2368,7 +2368,7 @@ Output stuff:
 \begin{code}
 pprPrimOp  :: PrimOp -> SDoc
 
-pprPrimOp (CCallOp ccall) = pprCCallOp ccall
+pprPrimOp (CCallOp c_call) = pprCCallOp c_call
 pprPrimOp other_op
   = getPprStyle $ \ sty ->
     if ifaceStyle sty then     -- For interfaces Print it qualified with PrelGHC.