aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/LexPascal.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'src/LexPascal.cxx')
-rw-r--r--src/LexPascal.cxx4
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)))) {