[commit: ghc] master: Remove unused unifyType_ (9ed57d6)
git at git.haskell.org
git at git.haskell.org
Thu Apr 28 16:32:28 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/9ed57d66e95e0f27085497dcf51ea9d7db2bde79/ghc
>---------------------------------------------------------------
commit 9ed57d66e95e0f27085497dcf51ea9d7db2bde79
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Mon Apr 25 16:17:07 2016 +0100
Remove unused unifyType_
>---------------------------------------------------------------
9ed57d66e95e0f27085497dcf51ea9d7db2bde79
compiler/typecheck/TcUnify.hs | 8 +-------
1 file changed, 1 insertion(+), 7 deletions(-)
diff --git a/compiler/typecheck/TcUnify.hs b/compiler/typecheck/TcUnify.hs
index b18671b..5d84a46 100644
--- a/compiler/typecheck/TcUnify.hs
+++ b/compiler/typecheck/TcUnify.hs
@@ -16,7 +16,7 @@ module TcUnify (
checkConstraints, buildImplicationFor,
-- Various unifications
- unifyType_, unifyType, unifyTheta, unifyKind, noThing,
+ unifyType, unifyTheta, unifyKind, noThing,
uType, unifyExpType,
--------------------------------
@@ -976,12 +976,6 @@ The exported functions are all defined as versions of some
non-exported generic functions.
-}
--- | Unify two types, discarding a resultant coercion. Any constraints
--- generated will still need to be solved, however.
-unifyType_ :: Outputable a => Maybe a -- ^ If present, has type 'ty1'
- -> TcTauType -> TcTauType -> TcM ()
-unifyType_ thing ty1 ty2 = void $ unifyType thing ty1 ty2
-
unifyType :: Outputable a => Maybe a -- ^ If present, has type 'ty1'
-> TcTauType -> TcTauType -> TcM TcCoercionN
-- Actual and expected types
More information about the ghc-commits
mailing list