diff --git a/src/version.ml b/src/version.ml index ae3c83f10..9c3ea4e2c 100644 --- a/src/version.ml +++ b/src/version.ml @@ -1 +1 @@ -let version = "Version 1.00, cbd715339, Sun Aug 23 00:18:53 2020 +0300" +let version = "Version 1.00, ac853957a, Tue Aug 25 16:09:43 2020 +0300" diff --git a/stdlib/Matcher.lama b/stdlib/Matcher.lama index 4ce673f11..6e0bdf506 100644 --- a/stdlib/Matcher.lama +++ b/stdlib/Matcher.lama @@ -34,8 +34,8 @@ fun createMatcher (buf, pos, line, col) { -- Moves the position pointer on given number of characters. fun shift (n) { local i, l = line, c = col; - - for i := pos, i < n, i := i+1 do + + for i := pos, i < pos+n, i := i+1 do case buf [i] of '\n' -> l := l + 1; c := 1 | '\t' -> c := c + 8