Commit 3269b15d authored by batterseapower's avatar batterseapower

Document CmmZipUtil

parent debbe39a
......@@ -11,7 +11,7 @@ import ZipCfg
import Maybes
import UniqSet
-- | Compute the predecessors of each *reachable* block
-- | Compute the predecessors of each /reachable/ block
zipPreds :: LastNode l => LGraph m l -> BlockEnv BlockSet
zipPreds g = foldl add emptyBlockEnv (postorder_dfs g)
where add env block@(Block id _) =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment