[commit: ghc] wip/js-hoopl-cleanup: Comment cleanup (a1931b9)
git at git.haskell.org
git at git.haskell.org
Thu Feb 11 09:06:08 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/js-hoopl-cleanup
Link : http://ghc.haskell.org/trac/ghc/changeset/a1931b9f28b1b44cc67b1666719db5ff46ee19ef/ghc
>---------------------------------------------------------------
commit a1931b9f28b1b44cc67b1666719db5ff46ee19ef
Author: Jan Stolarek <jan.stolarek at p.lodz.pl>
Date: Thu Feb 11 10:05:03 2016 +0100
Comment cleanup
>---------------------------------------------------------------
a1931b9f28b1b44cc67b1666719db5ff46ee19ef
compiler/cmm/Hoopl/Dataflow.hs | 8 --------
1 file changed, 8 deletions(-)
diff --git a/compiler/cmm/Hoopl/Dataflow.hs b/compiler/cmm/Hoopl/Dataflow.hs
index 1517c68..191ff11 100644
--- a/compiler/cmm/Hoopl/Dataflow.hs
+++ b/compiler/cmm/Hoopl/Dataflow.hs
@@ -226,8 +226,6 @@ forwardBlockList entries blks = postorder_dfs_from blks entries
-- Forward Analysis only
----------------------------------------------------------------
--- | if the graph being analyzed is open at the entry, there must
--- be no other entry point, or all goes horribly wrong...
analyzeFwd
:: forall n f . NonLocal n =>
FwdPass UniqSM n f
@@ -258,8 +256,6 @@ analyzeFwd FwdPass { fp_lattice = lattice,
cat :: forall f1 f2 f3 . (f1 -> f2) -> (f2 -> f3) -> (f1 -> f3)
cat ft1 ft2 = \f -> ft2 $! ft1 f
--- | if the graph being analyzed is open at the entry, there must
--- be no other entry point, or all goes horribly wrong...
analyzeFwdBlocks
:: forall n f. NonLocal n =>
FwdPass UniqSM n f
@@ -291,8 +287,6 @@ analyzeFwdBlocks FwdPass { fp_lattice = lattice,
-- Backward Analysis only
----------------------------------------------------------------
--- | if the graph being analyzed is open at the entry, there must
--- be no other entry point, or all goes horribly wrong...
analyzeBwd
:: forall n f. NonLocal n =>
BwdPass UniqSM n f
@@ -329,8 +323,6 @@ analyzeBwd BwdPass { bp_lattice = lattice,
-----------------------------------------------------------------------------
--- | if the graph being analyzed is open at the exit, I don't
--- quite understand the implications of possible other exits
analyzeAndRewriteBwd
:: NonLocal n
=> BwdPass UniqSM n f
More information about the ghc-commits
mailing list