From cc7d32ffebc93cbb59c9169965c589b0dbdb2768 Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Sun, 16 Dec 2007 12:51:41 +0000
Subject: [PATCH] Corrected a mistake in a comment

---
 transformations/ArrayUsageCheck.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/transformations/ArrayUsageCheck.hs b/transformations/ArrayUsageCheck.hs
index 7e4f905..f434471 100644
--- a/transformations/ArrayUsageCheck.hs
+++ b/transformations/ArrayUsageCheck.hs
@@ -36,7 +36,7 @@ import Types
 import Utils
 
 
--- TODO we should probably calculate this from the AST
+-- TODO we should probably calculate this from the CFG
 checkArrayUsage :: Data a => a -> PassM a
 checkArrayUsage tree = (mapM_ checkPar $ listify (const True) tree) >> return tree
   where