cgrep 6.4.11 → 6.4.12
raw patch · 4 files changed
+9/−12 lines, 4 files
Files
- README.md +1/−1
- cgrep.cabal +1/−1
- src/CGrep/Filter.hs +6/−9
- src/Config.hs +1/−1
README.md view
@@ -4,7 +4,7 @@ Usage ----- -Cgrep 6.4.11 Usage: cgrep [OPTION] [PATTERN] files...+Cgrep 6.4.12 Usage: cgrep [OPTION] [PATTERN] files... cgrep [OPTIONS] [ITEM]
cgrep.cabal view
@@ -1,6 +1,6 @@ Name: cgrep Description: Cgrep: a context-aware grep for source codes-Version: 6.4.11+Version: 6.4.12 Synopsis: Command line tool Homepage: http://awgn.github.io/cgrep/ License: GPL-2
src/CGrep/Filter.hs view
@@ -130,19 +130,16 @@ | CodeState <- cxtState s = let cindex = findBoundary (x,xs) (commBound c) lindex = findBoundary (x,xs) (litrBound c) in if bloom c ! x- then-- if cindex >= 0- then s{ cxtState = CommState cindex, display = codefilt, skip = C.length ( _beg (commBound c !! cindex) ) - 1 }- else if lindex >= 0- then s{ cxtState = LitrState lindex, display = codefilt, skip = C.length ( _beg (litrBound c !! lindex) ) - 1 }- else s{ display = codefilt, skip = 0 }-+ then if cindex >= 0+ then s{ cxtState = CommState cindex, display = commfilt, skip = C.length ( _beg (commBound c !! cindex) ) - 1 }+ else if lindex >= 0+ then s{ cxtState = LitrState lindex, display = codefilt, skip = C.length ( _beg (litrBound c !! lindex) ) - 1 }+ else s{ display = codefilt, skip = 0 } else s{ display = codefilt, skip = 0 } | CommState n <- cxtState s = let Boundary _ e = commBound c !! n in if C.head e == x && C.tail e `C.isPrefixOf` xs- then s{ cxtState = CodeState, display = codefilt, skip = C.length e - 1}+ then s{ cxtState = CodeState, display = commfilt, skip = C.length e - 1} else s{ display = commfilt, skip = 0 } | LitrState n <- cxtState s = let Boundary _ e = litrBound c !! n
src/Config.hs view
@@ -31,7 +31,7 @@ cgreprc = "cgreprc" version :: String-version = "6.4.11"+version = "6.4.12" data Config = Config