From 7fdef8f75a554cffbd872e58b36d2e981a92270a Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Tue, 25 Nov 2008 17:36:23 +0000
Subject: [PATCH] Added the checkUnusedVar check to the standard pass list

---
 pass/PassList.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/pass/PassList.hs b/pass/PassList.hs
index eac1546..d93291f 100644
--- a/pass/PassList.hs
+++ b/pass/PassList.hs
@@ -28,6 +28,7 @@ import qualified Data.Set as Set
 import qualified AST as A
 import BackendPasses
 import Check
+import CheckFramework
 import CompState
 import Errors
 import GenerateC
@@ -62,6 +63,8 @@ commonPasses opts = concat $
   , simplifyProcs
   , unnest
   , squashArrays
+  , [pass "Removing unused variables" [] []
+      (passOnlyOnAST "checkUnusedVar" (runChecks checkUnusedVar))]
   ]
 
 filterPasses :: CompState -> [Pass] -> [Pass]