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

Corrected a change that was accidentally recorded, switching primes for ats

Browse Source
This commit is contained in:
Neil Brown 2008-02-07 15:42:50 +00:00
parent 03ef5d23ba
commit e379710bbd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
checks/ArrayUsageCheck.hs
View File

@ -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'