suzanne.soy/tock-mirror
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Corrected a mistake in a comment

Browse Source
This commit is contained in:
Neil Brown 2007-12-16 12:51:41 +00:00
parent 3a65651885
commit cc7d32ffeb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
transformations/ArrayUsageCheck.hs
View File

@ -36,7 +36,7 @@ import Types
import Utils 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 :: Data a => a -> PassM a
checkArrayUsage tree = (mapM_ checkPar $ listify (const True) tree) >> return tree checkArrayUsage tree = (mapM_ checkPar $ listify (const True) tree) >> return tree
where where