From 78b06ae394b167950fabdf9163f35ee70d3dbca1 Mon Sep 17 00:00:00 2001 From: panne Date: Sat, 21 May 2005 15:20:43 +0000 Subject: [PATCH] [project @ 2005-05-21 15:20:43 by panne] Warning police: Removed an overlapped catch-all pattern (which could really never match due to genprimopcode) --- ghc/compiler/prelude/PrimOp.lhs | 1 - 1 file changed, 1 deletion(-) diff --git a/ghc/compiler/prelude/PrimOp.lhs b/ghc/compiler/prelude/PrimOp.lhs index 18024f7..e99eb9d 100644 --- a/ghc/compiler/prelude/PrimOp.lhs +++ b/ghc/compiler/prelude/PrimOp.lhs @@ -55,7 +55,6 @@ primOpTag op = iBox (tagOf_PrimOp op) -- supplies -- tagOf_PrimOp :: PrimOp -> FastInt #include "primop-tag.hs-incl" -tagOf_PrimOp op = pprPanic# "tagOf_PrimOp: pattern-match" (ppr op) instance Eq PrimOp where -- 1.7.10.4