From 70afebefa5837cc4aa83471019df0a270499486e Mon Sep 17 00:00:00 2001
From: Georgi Kirilov <>
Date: Wed, 27 Jan 2021 22:53:40 +0200
Subject: [PATCH] move the common Ct outside

---
 parser/init.lua | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/parser/init.lua b/parser/init.lua
index 9e48524..34ae2a3 100644
--- a/parser/init.lua
+++ b/parser/init.lua
@@ -183,9 +183,9 @@ local function make_parser(prefix, opposite, d1, d2, D1, D2, atom_node, list_nod
 		local section_break = I * "\f" / neg
 		local sexp =  (section_break + blank)^0 * (list + atom + lone_delimiter)
 		if advance ~= 0 then
-			local top_level = advance < 0
-				and Ct(sexp^advance)
-				or Ct((Cmt(Cc(advance - offset), past) * sexp)^0)
+			local top_level = Ct(advance < 0
+				and sexp^advance
+				or (Cmt(Cc(advance - offset), past) * sexp)^0)
 			tree = P{top_level / extract_breaks}:match(content)
 			tree.unbalanced = unbalanced
 		end
-- 
2.11.4.GIT