Org,optimizing: add a pattern to the toplevel table for skippingp lin…

…es starting from "#" earlyer Signed-off-by: Masatake YAMATO <yamato@redhat.com>
universal-ctags · Dec 27, 2022 · d068172 · d068172
1 parent e338bf4
commit d068172
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/optlib/org.c b/optlib/org.c
@@ -34,6 +34,9 @@ static void initializeOrgParser (const langType language)
 	addLanguageTagMultiTableRegex (language, "toplevel",
 	                               "^#\\+(NAME|name):[[:blank:]]+([[:graph:][:blank:]]+)([\n])?",
 	                               "\\2", "d", "", NULL);
+	addLanguageTagMultiTableRegex (language, "toplevel",
+	                               "^#[^\n]*\n",
+	                               "", "", "", NULL);
 	addLanguageTagMultiTableRegex (language, "toplevel",
 	                               "^(\\*{1,7})[ \t]+([[:graph:][:blank:]]+)([\n])?",
 	                               "", "", ""

diff --git a/optlib/org.ctags b/optlib/org.ctags
@@ -57,6 +57,8 @@
 --_mtable-regex-Org=toplevel/#\+begin_src[ ]+([a-zA-Z0-9][-#+a-zA-Z0-9]*)//{tenter=srcblock}{_guest=\1,0end,}
 # labels
 --_mtable-regex-Org=toplevel/#\+(NAME|name):[[:blank:]]+([[:graph:][:blank:]]+)([\n])?/\2/d/
+# skip #...
+--_mtable-regex-Org=toplevel/#[^\n]*\n//
 # sections stuff
 --_mtable-regex-Org=toplevel/(\*{1,7})[ \t]+([[:graph:][:blank:]]+)([\n])?//{{
     \2 kindTable \1 length 1 sub get @2 _tag _commit pop