Fixed the pre-condition of flattenAssign to include the types being resolved

This commit is contained in:
Neil Brown 2008-02-27 18:24:33 +00:00
parent 1afea6c62c
commit cfc3577c21

View File

@ -33,7 +33,7 @@ simplifyProcs :: [Pass]
simplifyProcs = makePassesDep
[ ("Wrap PAR subprocesses in PROCs", parsToProcs, [Prop.parUsageChecked], [Prop.parsWrapped])
, ("Remove parallel assignment", removeParAssign, [Prop.parUsageChecked, Prop.functionsRemoved], [Prop.assignParRemoved])
, ("Flatten assignment", flattenAssign, [Prop.assignParRemoved], [Prop.assignFlattened])
, ("Flatten assignment", flattenAssign, Prop.agg_typesDone ++ [Prop.assignParRemoved], [Prop.assignFlattened])
]
-- | Wrap the subprocesses of PARs in no-arg PROCs.