X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FhsSyn%2FHsUtils.lhs;h=9767afa87905d3e87f0b4c3e4f1de7a6dd34ff65;hp=cc57e0544181f02f9f625b004b7e44dc361f01bb;hb=c5b178be60a5a44abd2f4ddf8c399857678326e2;hpb=2d4d636af091b8da27466b5cf90011395a9c2f66

diff --git a/compiler/hsSyn/HsUtils.lhs b/compiler/hsSyn/HsUtils.lhs
index cc57e05..9767afa 100644
--- a/compiler/hsSyn/HsUtils.lhs
+++ b/compiler/hsSyn/HsUtils.lhs
@@ -737,3 +737,6 @@ collect_sig_pat (TuplePat pats _ _) acc = foldr collect_sig_lpat acc pats
 collect_sig_pat (ConPatIn _ ps)     acc = foldr collect_sig_lpat acc (hsConPatArgs ps)
 collect_sig_pat _                   acc = acc       -- Literals, vars, wildcard
 \end{code}
+
+
+