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'