QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-03 12:21:20 +00:00
Code Issues Releases Wiki Activity

Fix capitalization of 'to' in Case statements

Browse source
This commit is contained in:
Fellippe Heitor 2022-02-22 22:54:12 -03:00
parent 9bab4844b1
commit 02af89c94d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
source/qb64.bas
View file

@ -6488,7 +6488,7 @@ DO
IF i2 = 1 THEN e$ = el$ ELSE e$ = er$
e$ = fixoperationorder(e$)
IF Error_Happened THEN GOTO errmes
IF i2 = 1 THEN l$ = l$ + sp + tlayout$ ELSE l$ = l$ + sp + SCase$("TO") + sp + tlayout$
IF i2 = 1 THEN l$ = l$ + sp + tlayout$ ELSE l$ = l$ + sp + SCase$("To") + sp + tlayout$
e$ = evaluate(e$, typ)
IF Error_Happened THEN GOTO errmes
IF (typ AND ISREFERENCE) THEN e$ = refer(e$, typ, 0)