CEdit: minor fix

git-svn-id: svn://kolibrios.org@9906 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Anton Krotov
2023-03-05 21:40:21 +00:00
parent c682acbe2f
commit f8df2f2297
10 changed files with 367 additions and 367 deletions

View File

@@ -597,7 +597,7 @@ BEGIN
WHILE U.isDigit(Lines.getChar(line, i)) DO
INC(i)
END;
IF Lines.getChar(line, i) = "E" THEN
IF upper(Lines.getChar(line, i)) = "E" THEN
INC(i);
IF (Lines.getChar(line, i) = "+") OR (Lines.getChar(line, i) = "-") THEN
INC(i)
@@ -606,9 +606,9 @@ BEGIN
INC(i)
END
END
ELSIF Lines.getChar(line, i) = "H" THEN
ELSIF upper(Lines.getChar(line, i)) = "H" THEN
INC(i)
ELSIF Lines.getChar(line, i) = "X" THEN
ELSIF upper(Lines.getChar(line, i)) = "X" THEN
color := colors.string;
INC(i)
END