Cosmetics in stdlib/spec

This commit is contained in:
Dmitry Boulytchev 2020-03-08 00:57:25 +03:00
parent 50fc2e9f2a
commit 78305d22b3
6 changed files with 12 additions and 12 deletions

View file

@ -55,7 +55,7 @@ fun createMatcher (buf, pos, line, col) {
fun matchRegexp (r) {
local n;
if (n := regexpMatch (r[0], buf, pos)) > 0
if (n := regexpMatch (r[0], buf, pos)) >= 0
then Succ (substring (buf, pos, n), shift (n))
else Fail (sprintf ("%s expected", r[1]), line, col)
fi