From 77b75e31349fd02d0d82df9b96e7503ac3d02c70 Mon Sep 17 00:00:00 2001 From: Neil Brown Date: Tue, 25 Nov 2008 17:43:16 +0000 Subject: [PATCH] Fixed a couple of outdated comments by checkUnusedVar --- checks/Check.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/checks/Check.hs b/checks/Check.hs index 9c0874d..820a9dc 100644 --- a/checks/Check.hs +++ b/checks/Check.hs @@ -269,10 +269,7 @@ checkProcCallArgsUsage = mapM_ checkArgs . listify isProcCall checkPlainVarUsage (m, mockedupParItems) checkArrayUsage (m, fmap ((,) []) mockedupParItems) --- TODO we could do this much faster if we processed the AST bottom-up, and also --- accumulated the output of the listify on the variables as we went. - --- This isn't actually just unused variables, it's all unused names +-- This isn't actually just unused variables, it's all unused names (except PROCs) checkUnusedVar :: CheckOptM () checkUnusedVar = forAnyASTStructBottomUpAccum doSpec where