diff options
| -rw-r--r-- | src/LexPascal.cxx | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/LexPascal.cxx b/src/LexPascal.cxx index 371043d94..3dcf35ad5 100644 --- a/src/LexPascal.cxx +++ b/src/LexPascal.cxx @@ -414,7 +414,7 @@ static unsigned int SkipWhiteSpace(unsigned int currentPos, unsigned int endPos, } static void ClassifyPascalWordFoldPoint(int &levelCurrent, int &lineFoldStateCurrent, - unsigned int startPos, unsigned int endPos, + int startPos, unsigned int endPos, unsigned int lastStart, unsigned int currentPos, Accessor &styler) { char s[100]; GetRangeLowered(lastStart, currentPos, styler, s, sizeof(s)); @@ -471,7 +471,7 @@ static void ClassifyPascalWordFoldPoint(int &levelCurrent, int &lineFoldStateCur } else if (strcmp(s, "interface") == 0) { // "interface" keyword requires special handling... bool ignoreKeyword = true; - unsigned int j = lastStart - 1; + int j = lastStart - 1; char ch = styler.SafeGetCharAt(j); while ((j >= startPos) && (IsASpaceOrTab(ch) || ch == '\r' || ch == '\n' || IsStreamCommentStyle(styler.StyleAt(j)))) { |