From ed80d6acbf2a9e48f732331130f6dd7cbb6a0778 Mon Sep 17 00:00:00 2001
From: Joe Crayne <joe@jerkface.net>
Date: Sun, 9 Jun 2019 01:46:23 -0400
Subject: GroupNested: handle unexpected close comment.

---
 GrepNested.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/GrepNested.hs b/GrepNested.hs
index df52581..74033bd 100644
--- a/GrepNested.hs
+++ b/GrepNested.hs
@@ -74,6 +74,7 @@ grepNested p !lin !col s = case cmtToken p s of
     (EOL,tlen,cs)              -> grepNested p (lin+1) 1 cs
     (NullInput,tlen,_)         -> []
     (IgnoredChar clen,_,cs) -> grepNested p lin (col+clen) cs
+    (CloseNested,tlen,cs)   -> grepNested p lin (col+tlen) cs
 
 
 findCloser :: Num lin => CommentProtocol t
-- 
cgit v1.2.3