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

Added a missing base case for transformActualVariable, when a subscripted variable is passed to a procedure

Browse Source
This commit is contained in:
Neil Brown 2008-04-03 11:24:47 +00:00
parent 463ddc636b
commit cba72045d7
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
backends/BackendPasses.hs
View File

@ -303,6 +303,7 @@ addSizesActualParameters = doGeneric `extM` doProcess
_ -> return [a] _ -> return [a]
where where
a_sizes = A.Variable m (append_sizes n) a_sizes = A.Variable m (append_sizes n)
transformActualVariable a _ = return [a]
-- | Transforms all slices into the FromFor form. -- | Transforms all slices into the FromFor form.
simplifySlices :: Data t => t -> PassM t simplifySlices :: Data t => t -> PassM t