diff options
author | Marius <mariausol@gmail.com> | 2014-02-13 13:00:35 +0200 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2014-02-13 13:00:35 +0200 |
commit | 43b2c43c53673bbaebc0cec57d32c4609c026cd9 (patch) | |
tree | fe93e87b47c31f163d6042cc27af86d2a990fb28 /tex/context/base/l-lpeg.lua | |
parent | 8c7fab57c5fd2db6b9ade5f7608add9f650c8460 (diff) | |
download | context-43b2c43c53673bbaebc0cec57d32c4609c026cd9.tar.gz |
beta 2014.02.13 11:27
Diffstat (limited to 'tex/context/base/l-lpeg.lua')
-rw-r--r-- | tex/context/base/l-lpeg.lua | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tex/context/base/l-lpeg.lua b/tex/context/base/l-lpeg.lua index 6d3acd753..6feb7089c 100644 --- a/tex/context/base/l-lpeg.lua +++ b/tex/context/base/l-lpeg.lua @@ -176,12 +176,14 @@ patterns.whitespace = whitespace patterns.nonspacer = nonspacer patterns.nonwhitespace = nonwhitespace -local stripper = spacer^0 * C((spacer^0 * nonspacer^1)^0) -- from example by roberto +local stripper = spacer ^0 * C((spacer ^0 * nonspacer ^1)^0) -- from example by roberto +local fullstripper = whitespace^0 * C((whitespace^0 * nonwhitespace^1)^0) ----- collapser = Cs(spacer^0/"" * ((spacer^1 * endofstring / "") + (spacer^1/" ") + P(1))^0) local collapser = Cs(spacer^0/"" * nonspacer^0 * ((spacer^0/" " * nonspacer^1)^0)) patterns.stripper = stripper +patterns.fullstripper = fullstripper patterns.collapser = collapser patterns.lowercase = lowercase |