mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-28 11:17:46 +00:00
Allow ? to be highlighted even if immediately followed by another "word".
Cases like ?myVar% get properly highlighted.
This commit is contained in:
parent
70fd9d872e
commit
7d842c9927
1 changed files with 2 additions and 0 deletions
|
@ -8142,6 +8142,7 @@ SUB ideshowtext
|
||||||
IF INSTR(char.sep$, MID$(a2$, i, 1)) > 0 OR MID$(a2$, i, 1) = "." THEN right.sep$ = MID$(a2$, i, 1): EXIT FOR
|
IF INSTR(char.sep$, MID$(a2$, i, 1)) > 0 OR MID$(a2$, i, 1) = "." THEN right.sep$ = MID$(a2$, i, 1): EXIT FOR
|
||||||
checkKeyword$ = checkKeyword$ + MID$(a2$, i, 1)
|
checkKeyword$ = checkKeyword$ + MID$(a2$, i, 1)
|
||||||
NEXT
|
NEXT
|
||||||
|
IF comment = 0 AND LEFT$(checkKeyword$, 1) = "?" THEN isKeyword = 1: GOTO setOldChar
|
||||||
checkKeyword$ = UCASE$(checkKeyword$)
|
checkKeyword$ = UCASE$(checkKeyword$)
|
||||||
IF INSTR(listOfKeywords$, "@" + checkKeyword$ + "@") > 0 THEN
|
IF INSTR(listOfKeywords$, "@" + checkKeyword$ + "@") > 0 THEN
|
||||||
IF checkKeyword$ = "$END" THEN
|
IF checkKeyword$ = "$END" THEN
|
||||||
|
@ -8223,6 +8224,7 @@ SUB ideshowtext
|
||||||
END IF
|
END IF
|
||||||
END IF
|
END IF
|
||||||
END IF
|
END IF
|
||||||
|
setOldChar:
|
||||||
oldChar$ = thisChar$
|
oldChar$ = thisChar$
|
||||||
|
|
||||||
IF isKeyword > 0 AND keywordHighlight THEN
|
IF isKeyword > 0 AND keywordHighlight THEN
|
||||||
|
|
Loading…
Reference in a new issue