Added a missing base case for transformActualVariable, when a subscripted variable is passed to a procedure
This commit is contained in:
parent
463ddc636b
commit
cba72045d7
|
@ -303,6 +303,7 @@ addSizesActualParameters = doGeneric `extM` doProcess
|
|||
_ -> return [a]
|
||||
where
|
||||
a_sizes = A.Variable m (append_sizes n)
|
||||
transformActualVariable a _ = return [a]
|
||||
|
||||
-- | Transforms all slices into the FromFor form.
|
||||
simplifySlices :: Data t => t -> PassM t
|
||||
|
|
Loading…
Reference in New Issue
Block a user