Skip to content

Commit f3d527f

Browse files
committed
ReadRegex: Raise correct error for empty char range (see #1)
1 parent 440e760 commit f3d527f

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

lib/Text/Regex/TDFA/ReadRegex.hs

+1-1
Original file line numberDiff line numberDiff line change
@@ -15,8 +15,8 @@ import Text.ParserCombinators.Parsec((<|>), (<?>),
1515
sepBy1, option, notFollowedBy, many1, lookAhead, eof, between,
1616
string, noneOf, digit, char, anyChar)
1717

18-
import Control.Applicative (asum)
1918
import Control.Monad (liftM, guard)
19+
import Data.Foldable (asum)
2020
import qualified Data.Set as Set(fromList)
2121

2222
-- | An element inside @[...]@, denoting a character class.

0 commit comments

Comments
 (0)