From: Ian Lynagh <igloo@earth.li>
Date: Sat, 4 Aug 2007 15:33:33 +0000 (+0000)
Subject: Add a comment about when maybePrefixMatch can be removed
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=41b4b210247d5cf13952d4e115fc4d6b58eef234;ds=sidebyside

Add a comment about when maybePrefixMatch can be removed
---

diff --git a/compiler/utils/Util.lhs b/compiler/utils/Util.lhs
index bfb499a..495df82 100644
--- a/compiler/utils/Util.lhs
+++ b/compiler/utils/Util.lhs
@@ -590,6 +590,8 @@ cmpList cmp (a:as) (b:bs)
 \end{code}
 
 \begin{code}
+-- This (with a more general type) is Data.List.stripPrefix from GHC 6.8.
+-- This definition can be removed once we require at least 6.8 to build.
 maybePrefixMatch :: String -> String -> Maybe String
 maybePrefixMatch []    rest = Just rest
 maybePrefixMatch (_:_) []   = Nothing