[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