From e379710bbdc807c1e7ff8f739d29822a58d559ca Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Thu, 7 Feb 2008 15:42:50 +0000
Subject: [PATCH] Corrected a change that was accidentally recorded, switching
 primes for ats

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

diff --git a/checks/ArrayUsageCheck.hs b/checks/ArrayUsageCheck.hs
index 0380573..892ab52 100644
--- a/checks/ArrayUsageCheck.hs
+++ b/checks/ArrayUsageCheck.hs
@@ -152,7 +152,7 @@ checkArrayUsage (m,p) = mapM_ (checkIndexes m) $ Map.toList $
     showFlattenedExp :: FlattenedExp -> m String
     showFlattenedExp (Const n) = return $ show n
     showFlattenedExp (Scale n ((A.Variable _ vn),vi))
-      = do vn' <- getRealName vn >>* (++ replicate vi '@')
+      = do vn' <- getRealName vn >>* (++ replicate vi '\'')
            case n of
              1  -> return vn'
              -1 -> return $ "-" ++ vn'