[commit: ghc] master: Comments only (6f95e23)

git at git.haskell.org git at git.haskell.org
Thu Jan 21 10:08:30 UTC 2016


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/6f95e23249c18d2e808b6586d2efecd3f3f0fb50/ghc

>---------------------------------------------------------------

commit 6f95e23249c18d2e808b6586d2efecd3f3f0fb50
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Wed Jan 20 14:09:35 2016 +0000

    Comments only


>---------------------------------------------------------------

6f95e23249c18d2e808b6586d2efecd3f3f0fb50
 compiler/typecheck/TcSimplify.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/typecheck/TcSimplify.hs b/compiler/typecheck/TcSimplify.hs
index c428ce9..9ea3d91 100644
--- a/compiler/typecheck/TcSimplify.hs
+++ b/compiler/typecheck/TcSimplify.hs
@@ -146,7 +146,7 @@ simpl_top wanteds
            ; if something_happened
              then do { wc_residual <- nestTcS (solveWantedsAndDrop wc)
                      ; try_class_defaulting wc_residual }
-                  -- See Note [Overview of implicit CallStacks]
+                  -- See Note [Overview of implicit CallStacks] in TcEvidence
              else try_callstack_defaulting wc }
 
     try_callstack_defaulting :: WantedConstraints -> TcS WantedConstraints
@@ -158,7 +158,7 @@ simpl_top wanteds
 
 -- | Default any remaining @CallStack@ constraints to empty @CallStack at s.
 defaultCallStacks :: WantedConstraints -> TcS WantedConstraints
--- See Note [Overview of implicit CallStacks]
+-- See Note [Overview of implicit CallStacks] in TcEvidence
 defaultCallStacks wanteds
   = do simples <- handle_simples (wc_simple wanteds)
        implics <- mapBagM handle_implic (wc_impl wanteds)



More information about the ghc-commits mailing list