R/RspParser.R
changed.
Other files ignored by Codecov
DESCRIPTION
has changed.
108 | 108 | # Setup |
|
109 | 109 | # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - |
|
110 | 110 | # Pattern for suffix specification |
|
111 | - | ## patternS <- "(([+]))|([-]+\\[([^]]*)\\])?%>" |
|
112 | - | patternS <- "([+]|[-]+(\\[[^]]*\\])?)%>" |
|
111 | + | patternS <- paste("([+]|[-]+(\\[[^]]*\\])?)", .rspBracketClose, sep="") |
|
113 | 112 | ||
114 | 113 | # Setup the regular expressions for start and stop RSP constructs |
|
115 | 114 | hasPatternLTail <- FALSE |
267 | 266 | # Was it an escaped RSP end tag, i.e. '%%>'? |
|
268 | 267 | if (what == "expression") { |
|
269 | 268 | nT <- nchar(tail) |
|
270 | - | if (nT >= 3L && substring(tail, first=nT-2L, last=nT) == "%%>") |
|
269 | + | if (nT >= nchar(.rspBracketCloseEscape) && substring(tail, first=nT-nchar(.rspBracketCloseEscape)+1L, last=nT) == .rspBracketCloseEscape) |
|
271 | 270 | break |
|
272 | 271 | } |
|
273 | 272 |
Files | Coverage |
---|---|
R | 57.74% |
Project Totals (72 files) | 57.74% |