From ae9408573da499e87485cc2957b15893bbc8feb5 Mon Sep 17 00:00:00 2001
From: "benl@ouroborus.net" <unknown>
Date: Mon, 30 Aug 2010 04:03:40 +0000
Subject: [PATCH] Fix warnings

---
 compiler/vectorise/VectMonad.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/vectorise/VectMonad.hs b/compiler/vectorise/VectMonad.hs
index 51e7601..0ce6930 100644
--- a/compiler/vectorise/VectMonad.hs
+++ b/compiler/vectorise/VectMonad.hs
@@ -474,7 +474,7 @@ maybeCantVectoriseVarM v p
 
 dumpVar :: Var -> a
 dumpVar var
-	| Just cls		<- isClassOpId_maybe var
+	| Just _		<- isClassOpId_maybe var
 	= cantVectorise "ClassOpId not vectorised:" (ppr var)
 
 	| otherwise
-- 
1.7.10.4