[project @ 2002-03-13 13:39:15 by simonmar]

Fix panic message.

diff --git a/ghc/compiler/prelude/PrimRep.lhs b/ghc/compiler/prelude/PrimRep.lhs
index 515ba05..f6cfd77 100644 (file)
--- a/ghc/compiler/prelude/PrimRep.lhs
+++ b/ghc/compiler/prelude/PrimRep.lhs
@@ -221,7 +221,7 @@ getPrimRepArrayElemSize Int32Rep      = 4
 getPrimRepArrayElemSize Int64Rep      = 8
 getPrimRepArrayElemSize FloatRep      = 4
 getPrimRepArrayElemSize DoubleRep     = 8
-getPrimRepArrayElemSize other         = pprPanic "getPrimRepSizeArrayElemSize" (ppr other)
+getPrimRepArrayElemSize other         = pprPanic "getPrimRepArrayElemSize" (ppr other)
 
 \end{code}