From 41b4b210247d5cf13952d4e115fc4d6b58eef234 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 4 Aug 2007 15:33:33 +0000 Subject: [PATCH] Add a comment about when maybePrefixMatch can be removed --- compiler/utils/Util.lhs | 2 ++ 1 file changed, 2 insertions(+) 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 -- 1.7.10.4