Print infix function definitions correctly in HsSyn

[ghc-hetmet.git] / compiler / typecheck / TcMatches.lhs-boot

diff --git a/compiler/typecheck/TcMatches.lhs-boot b/compiler/typecheck/TcMatches.lhs-boot
index bb9fa66..e50949f 100644 (file)
--- a/compiler/typecheck/TcMatches.lhs-boot
+++ b/compiler/typecheck/TcMatches.lhs-boot
@@ -9,7 +9,7 @@ tcGRHSsPat    :: GRHSs Name
              -> BoxyRhoType
              -> TcM (GRHSs TcId)
 
-tcMatchesFun :: Name
+tcMatchesFun :: Name -> Bool
             -> MatchGroup Name
             -> BoxyRhoType
             -> TcM (HsWrapper, MatchGroup TcId)