2021-02-08 06:23:31 +00:00
|
|
|
SPDX-FileCopyrightText: 2021 Andrius Štikonas <andrius@stikonas.eu>
|
|
|
|
SPDX-FileCopyrightText: 2019-2020 Giovanni Mascellani <gio@debian.org>
|
|
|
|
SPDX-FileCopyrightText: 2021 fosslinux <fosslinux@aussies.space>
|
|
|
|
|
|
|
|
SPDX-License-Identifier: BSD-2-Clause
|
|
|
|
|
2021-02-03 06:03:25 +00:00
|
|
|
Comments are unsupported by our flex.
|
|
|
|
|
2021-01-28 18:53:44 +00:00
|
|
|
diff --git scan.l scan.l
|
|
|
|
index 18d0de8..c251a5e 100644
|
|
|
|
--- scan.l
|
|
|
|
+++ scan.l
|
|
|
|
@@ -334,8 +335,8 @@ LEXOPT [aceknopr]
|
|
|
|
|
|
|
|
|
|
|
|
<SECT2PROLOG>{
|
|
|
|
- ^"%{".* ++bracelevel; yyless( 2 ); /* eat only %{ */
|
|
|
|
- ^"%}".* --bracelevel; yyless( 2 ); /* eat only %} */
|
|
|
|
+ ^"%{".* ++bracelevel; yyless( 2 );
|
|
|
|
+ ^"%}".* --bracelevel; yyless( 2 );
|
|
|
|
|
|
|
|
^{WS}.* ACTION_ECHO; /* indented code in prolog */
|
|
|
|
|
|
|
|
@@ -480,11 +481,11 @@ LEXOPT [aceknopr]
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
+ "{"{NAME}"}"[[:space:]]? {
|
|
|
|
/* Check for :space: at the end of the rule so we don't
|
|
|
|
* wrap the expanded regex in '(' ')' -- breaking trailing
|
|
|
|
* context.
|
|
|
|
*/
|
|
|
|
- "{"{NAME}"}"[[:space:]]? {
|
|
|
|
register Char *nmdefptr;
|
|
|
|
int end_is_ws, end_ch;
|
|
|
|
|